Есть ответ 👍

Составить программу подсчета суммы четных чисел от 10до 50

145
295
Посмотреть ответы 2

Ответы на вопрос:


program gg;

var i,s: integer;

begin

  for i: =10 to 50 do

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

  writeln('сумма всех четных чисел от 10 до 50 равна ',s)

end.


блок схема, таблица

и возможно диаграма

Популярно: Информатика