Question

Дано натуральное число n.Написать программу ,выводящую на экран последовательность натуральных чисел от 1 до n.

Answer 1

program vikaromanenko;
var n,i:integer;
begin
writeln('n=');
readln(n);
for i:=1 to n do
write(i);
end.