Написать программу, которая выводит на экран значения элементов массива в обратном порядке. В массиве 10 элементов, массив заполняется с помощью случайных чисел из интервала (0, 100). (Паскаль)

program revers;

var a: array [1 ... 10] of integer; / /объявление массива

i:integer; / /параметр циклов

begin

randomize;

for i: = 1 to 10 do / /формирование и вывод исходного массива

begin

//элементу а[i] присваивается случайное число из диапазона 0 ... 100

a[i]: = random (101);

write (a[i]:5);

end;

writeln ();

for i:=10 downto 1 do write (a[i]:5) / / вывод массива в обратном порядке

end.