PascalABC. NETСоставьте программу для ввода значений 10 элементов массива с клавиатуры и вывода их на экран в обратном порядке. ​

var

a: array[1. . 10] of integer;

i: integer;

begin

for i := 1 to 10 do Read(a[i]);

Writeln('Введённые числа в обратном порядке:');

for i := 10 downto 1 do Write(a[i], ' ');

end.