Написать программу в паскале: Найти сумму чисел от 100 до 200 кратных 17.
Написать программу в паскале: Найти сумму чисел от 100 до 200 кратных 17.
Гость
Ответ(ы) на вопрос:
ГостьГотово........................
Гостьprogram p200;
var i: integer;
begin
for i:=100 to 200 do
if i mod 17=0 then writeln(i)
end.
Не нашли ответ?
Похожие вопросы