PascalABC.NET 3.4.2, сборка 1864 от 11.11.2018
Внимание! Если программа не работает, обновите версию!
begin
var a := ArrRandom(ReadInteger('n='), -10, 10);
a.Println.Reverse.Println
end.
Пример
n= 15
-6 -6 -3 -8 -3 -9 -9 -8 7 6 1 -2 -3 7 5
5 7 -3 -2 1 6 7 -8 -9 -9 -3 -8 -3 -6 -6