Определить сумму всех чисел оканчивающихся на 5 или 10 в диапазоне от 50 до 300. вот числа которые надо ввести в ответ: 135, 312, 310, 265, 8910, 55, 0.

Question

Информатика

Гаврила

1 марта, 21:58

Определить сумму всех чисел оканчивающихся на 5 или 10 в диапазоне от 50 до 300. вот числа которые надо ввести в ответ: 135, 312, 310, 265, 8910, 55, 0.

+2

Ответы (1)

Знаешь ответ?

Смарагд · Answer 1

Uses crt; var n, i, summ: integer; begin clrscr; writeln ('Введите числа: '); readln (n); i:=0; for i:=50 to 300 do begin if i mod 5 = 0 then writeln (i); end; end.