• Вопрос по информатике:

    Напечатать четные, натуральные числа , не превышающие N.N ввести с клавиатуры. Программа в паскаль.

    • Автор:

      aryn
  • program raf105;

    var i,n: integer;

    begin

    write('Введите N: ');

    readln(n);

    for i:=1 to n do

     if i mod 2 = 0

       then writeln(i);

    end.

    PascalABC 3.4.2
    • Отвечал:

      shilohliu

    Ответов нет, но ты это испарвиш!