Найдите все натуральные числа на промежутке от 1 до 200, которые делятся на 3 в паска?

Найдите все натуральные числа на промежутке от 1 до 200, которые делятся на 3 в паска??е
Гость
Ответ(ы) на вопрос:
Гость
Var i:integer; begin For i:=1 to 200 do If i mod 3 = 0 then write(i,' '); end.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы