Вывести на экран все числа, кратные 3 в интервале от M до N при M
Вывести на экран все числа, кратные 3 в интервале от M до N при M
Ответ(ы) на вопрос:
Гость
var
i, n, m: integer;
begin
readln(m, n);
for i := m to n do
if i mod 3 = 0 then writeln(i);
end.
Не нашли ответ?
Похожие вопросы