массив из 20 элементов заполнить случайными числами в диапазоне от -50 до 50. отсортировать массив по возрастанию. ООООЧЕНЬ СРОЧНО ПРОШУ

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