Дана последовательность из n целых чисел. найти сумму нечётных элементов этой последовательности.

toklike toklike    2   08.07.2019 14:30    2

Ответы
handofkremlin handofkremlin  02.10.2020 22:51
Program work; Var chisla:array [1..n] of integer; sum, i:integer; Begin For i:=1 to n do Begin If chisla [i] mod 2 <>0 then Sum:=sum+chisla[i]; End; Writeln (sum); End.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика