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

234

284

Посмотреть ответы 2

Ответы на вопрос:

knyzeva2804

Информатика

4,7(77 оценок)

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