3. Требуется написать программу, которая вводит в массив натуральные числа, не превосходящие числа 1000. Данные числа формируются датчиком «случайных чисел». Программа выводит эти числа. Затем программа упорядочивает элементы массива по не возрастанию их значений. Программа на вход получает от Вас только количество чисел, которые должен сформировать датчик.

PascalABC.NET 3.4.2, сборка 1837 от 11.10.2018Внимание! Если программа не работает, обновите версию!

begin

 var a := ArrRandom(ReadInteger('n='), 1, 1000);

 a.Println;

end.