Cоставить программу в Паскале: напечатать первые n натуральных чисел. n вводится с клавиатуры. Только с помощью оператора repeat
Cоставить программу в Паскале: напечатать первые n натуральных чисел. n вводится с клавиатуры. Только с помощью оператора repeat
Ответ(ы) на вопрос:
Var n,a:integer;
Begin
a:=1;
write('Введите n:'); readln(n);
repeat
write(a,', ');
a:=a+1; n:=n-1;
until(n=0);
End.
Не нашли ответ?
Похожие вопросы