Question

Дано натуральное число N(Вводится с клавиатуры). Написать программу, выводящую на экран натуральные числа от 1 до N. входные данные 4 выходные данные 1 2 3 4

Answer 1

Program prim;

var n,i: integer;

begin

writeln ('Введите число n', n);

readln (n);

for i:=1 to n do write (i);

end.