Однамерный массив а заполнен дестью случайными целыми числами от 1 до 20. напишите программу вывода элементов массива в обратном порядке.

Var a:array [1..10] of integer; i:integer;
begin
for i:=10 downto 1 do
begin
a[i]:=random(1,20);
write(a[i]:3);
end;
end.