Составить программу вычисляющую сумму нечетных чисел от 1 до 10.

tema152331 tema152331    2   05.07.2019 14:50    6

Ответы
nodir9842446 nodir9842446  02.10.2020 20:46
Var sum:integer;
i:integer;
begin 
sum:=0;
for i:=1 to 10 do 
if i mod 2=1 then sum:=sum+i;
writeln(sum);
readln;
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика