Question

Напишите программу, которая вводит натуральное число N и выводит в строчку через пробел N натуральных чисел в обратном порядке от N до 1.

Answer 1

Var i, n:integer ;

Begin

Write ('n=') ;read (n) ;

For i:=n downto 1 do

Write (i, ' ') ;

End.