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

Написать программу в паскале: Вывести на экран натуральные чётные числа от 10 до 80(While).

  1. Ответ
    Ответ дан Эклео
    var
      n: integer :=10; 
      m: integer :=80;
    begin;
      while n<=m do begin
        write (n:3);
        n:=n+2
      end
    end.

    ------------------Результат:--------------------

    10 12 14 16 18 20 22 24 26 28 30 32 34 36 38 40 42 44 46 48 50 52 54 56 58 60 62 64 66 68 70 72 74 76 78 80

Самые новые вопросы