Составьте программу для ввода и вывода с клавиатуры в массив 7 целых чисел и вывода в обратном порядке. заранее за ответ)

program n14785; Var A:array[1..7] of integer; i:integer; begin for i:=7 downto 1 do   read(A[i]);     end.