// PascalABC.NET 3.2, сборка 1509 от 27.07.2017
// Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(ReadInteger('n='),-50,50);
a.Println.Sorted.Println
end.
Пример
n= 20
17 43 -16 4 -50 -35 -23 -46 -46 -30 40 -4 0 6 -6 47 34 45 -31 -35
-50 -46 -46 -35 -35 -31 -30 -23 -16 -6 -4 0 4 6 17 34 40 43 45 47