Дано целое число n. вывести все целые числа от 1 до n в обратном порядке pascal
Var n, i: integer; begin readln(n); for i := n downto 1 do write(i, ' '); end.
пойдёт?
да