3. требуется написать программу, которая вводит в массив натуральные числа, не превосходящие числа 1000. данные числа формируются датчиком «случайных чисел». программа выводит эти числа. затем программа упорядочивает элементы массива по не возрастанию их значений. программа на вход получает от вас только количество чисел, которые должен сформировать датчик.
begin
var a := ArrRandom(ReadInteger('n='), 1, 1000);
a.Println;
end.