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