// PascalABC.NET 3.3, сборка 1583 от 25.11.2017
// Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(20,-50,50); a.Println;
a.Sort; a.Println
end.
Пример
16 -19 -27 -1 24 17 47 -33 14 28 -12 -43 -27 37 44 -8 -2 39 -8 9
-43 -33 -27 -27 -19 -12 -8 -8 -2 -1 9 14 16 17 24 28 37 39 44 47