ПАСКАЛЬ! Дан массив размера N. Вывести его элементы в обратном порядке.

Можно так:Const N = 10;Var A:array[1..N] of integer;i:integer;BeginFor i:= 1 to N do    Begin    A[i]:=random(21)-10;    Write(A[i],);    End;WriteLn;For i:= N downto 1 do    Write(A[i],);End.и так:Const N = 10;Var A:array[1..N] of integer;i:integer;BeginFor i:= 1 to N do    Begin    A[i]:=random(21)-10;    Write(A[i],);    End;WriteLn;For i:= 1 to N do    Write(A[N-i+1],);End.