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