Cоставить программу в Паскале: напечатать первые n натуральных чисел

Question

Cоставить программу в Паскале: напечатать первые n натуральных чисел. n вводится с клавиатуры. Только с помощью оператора repeat

Answer 1

47

denjer

22 марта 2023

Var n,a: integer; Begin a: =1; write ('Введите n: '); readln (n); repeat write (a,', '); a: =a+1; n: =n-1; until (n=0); End.

пользователи выбрали этот ответ лучшим

комментировать

в избранное ссылка отблагодарить