Ввести естественное число N и вывести в строку все числа от

program zz1;

var  n, i:integer; // задаем переменные целого типа

begin

write( введите натуральное число n );  // вводим с клавиатуры данное число

read(n);  

for i:=n downto 1 do // организуем цикл, в котором переберем все числа от N до единицы

write(  , i); // выводим ответ в строчку через пробел

end.