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

Question

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

Comments

то есть если n = 4, то должно вывести 1,2,3,4?

---

Да)

Answer 1

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

Comments

Спасииибо^^