Напишите пожалуйста программу в паскале, что бы суммировало числа от 1 до 50 которые заканчиваются на три.

var

  i, summ:integer;

begin

  for i := 1 to 50 do

    if i mod 10 = 3 then

      summ := summ + i;

  writeln(Summ = , summ);

end.

Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!

Загрузить картинку