отсортироватьмассив по возрастанию (один массивом)

begin
  var a:=ArrRandom(ReadInteger('n='),-50,50); a.Println;
  a.Sort; a.Println
end.


n= 13
24 13 -40 -41 46 37 -16 -21 -39 39 -10 -28 15
-41 -40 -39 -28 -21 -16 -10 13 15 24 37 39 46