Напишите программу, которая в последовательности натуральных чисел определяет сумму нечетных чисел, меньших 40. программа получает на вход количество чисел в последовательности, а затем сами числа. кол-во чисел не превышает 1000. введеные числа не превышают 30000. программа должна вывести одно число - сумму нечетных чисел, меньших 40. пример работы программы:входные данные 3 21 54 37 выходные данные 58. pascal abc

Aleksandra1111117 Aleksandra1111117    1   14.09.2019 18:40    3

Ответы
sestrichkitv sestrichkitv  10.08.2020 20:02
var n,a,s,i:integer;
begin
readln(n);
s:=0;
for i:=1 to n do
begin
readln(a);
if (a mod 2=1)and(a<40) then s:=s+a;
end;
writeln(s);
end.

Пример:
3
21
54
37
58
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика