Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
текст письма
Объяснение: мне так кажеться
ответ:буква (в)
отвечаю
dim a(12), b(12), c(12)
input "введите размерность массивов а и в - m= ", m
print "введите элементы массивов а и в: "
for i=1 to m
input a(i), b(i)
next i
s=0
for i = 1 to m
c(i)= a(i) + b(m-i+1)
s= s+c(i)
print "массив а: "
print a(i);
print
print "массив b: "
print b(i);
print "массив c: "
print c(i);
print "сумма элементов массива с ="; s
program xxx;
var i, m, p, n : integer;
t : array[1..31] of real;
begin
writeln('введите температуру ')
for i: =1 to 31 do
readln(t[i]);
m: =0; p: =0; n: =0;
if t[i]< 0 then m: =m+1;
if t[i]> 0 then p: =p+1;
if t[i]=0 then n: =n+1
end;
writeln('дней с отрицательной температурой было - ', m);
writeln('дней с положительной температурой было - ', р);
writeln('дней с нулевой температурой было - ', n);
readln
end.
Популярные вопросы