profile
Опубликовано 5 лет назад по предмету Информатика от k305

1. Вывести все четные числа начиная с числа N до числа M. Числа N и M задает пользователь. Напишите программу Паскале, пожалуйста.

  1. Ответ
    Ответ дан MrMiner1

    Program n_1;

    var n, m, i:integer;

    begin

       read (n, m);

       for i:=n to m do if i mod 2 = 0 then write(i, ' ');

    end.