Не могу с клавиатуры вводятся n чисел. найти сумму первых трёх нечетных чисел. вас с

opvictor01p08056 opvictor01p08056    3   02.06.2019 15:20    1

Ответы
A1mSh1k A1mSh1k  03.07.2020 10:42
Var numb,n,summa,k:integer;
begin
readln(n);
for k:= 1 to n do
 begin
readln(numb);
if numb mod 2 =1 then
summa:=summa+numb;
end;
writeln(summa);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика