ПОМОГИТЕ! ОЧЕНЬ СРОЧНО! Заполнить массив А[1..30] (т.е из 30 элементов) из [-100;100] по возрастанию.

// PascalABC.NET 3.1, сборка 1214 от 09.04.2016begin  var a:=ArrRandom(30,-100,100); a.Println;  a.Sorted.Printend.Тестовое решение:66 -58 -75 -13 0 -89 75 41 37 -62 96 47 14 -14 24 -45 -60 52 14 94 -18 100 8 -92 -62 100 66 51 89 -36-92 -89 -75 -62 -62 -60 -58 -45 -36 -18 -14 -13 0 8 14 14 24 37 41 47 51 52 66 66 75 89 94 96 100 100