Question

Составить программу вывода всех чисел от одного до n если число n вводит пользователь , составить в turbo pascal

Answer 1

Var n,i:integer;
begin;
readln(n);
for i:=1 to n do
writeln(i);
end.