Вам таков вопрос дорогие друзья (на 15 баллов) надо написать программу вывода на экран n первых натуральных чисел.

program ...; varn, i : integer;beginwrite("n=");readln(n);i:=1;while n>0 dobeginwrite(i' ');n:=n-1;end;end.