Составить программу выводящую на экран сумму всех чётных чисел в промежутке от 12 до 30

денис1134 денис1134    3   18.03.2019 14:50    0

Ответы
Nikaslavnikova Nikaslavnikova  26.05.2020 00:07

var sum,i:longint;

 

begin

 

sum:=0;

for i:=10 to 30 do

if i mod 2=0 then sum:=sum+i;

 

write(sum);

 

end;

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