Вывести на экран все числа, кратные 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.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы