Задать вопрос
4 августа, 03:25

Помогите решить!

Вывести на печать числа от 0 до n, считая, что все числа натуральные, нужно составить 3 программы: 1) for 2) while 3) repeat

+2
Ответы (1)
  1. 4 августа, 06:15
    0
    1)

    Program n1;

    var n, i: integer;

    begin

    readln (n) ;

    for i:=0 to n do write (i,' ') ;

    end.

    2)

    Program n1;

    var n, i: integer;

    begin

    readln (n) ;

    i:=0;

    while i<=n do

    begin

    write (i,' ') ;

    i:=i+1;

    end;

    end.

    3)

    Program n1;

    var n, i: integer;

    begin

    readln (n) ;

    i:=0;

    repeat

    write (i,' ') ;

    i:=i+1;

    until i>n

    end.

    примечание:

    0 не является натуральным числом, поэтому если надо, чтобы числа выводились начиная с 1, надо везде строчку i:=0 заменить на i:=1
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «Помогите решить! Вывести на печать числа от 0 до n, считая, что все числа натуральные, нужно составить 3 программы: 1) for 2) while 3) ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы