Нужно составить программу в Paskal ' e для нахождения суммы ряда нечётных чисел с использованием for...to, где n - количество чисел, i - число для цикла, summa - сумма чисел.

Ответы

Ответ дал: sasha58russs
0
summa:=0;
for i:=1 to n do
if a[i]mod 2 <>0 then summa:=a[i]+summa;
end.
Ответ дал: elizaveta11s
0
надо через тип Integer, а не через boolean, но всё равно спасибо
Похожие вопросы