Question

Заполнить массив из N чисел простыми числами. Отсортировать массив в порядке убывания.(Паскаль)

Answer 1

uses School; // PascalABC.NET не древнее 14.04.2020

begin

 var n := ReadInteger('n =');

 var a := FirstPrimes(n).Shuffle;

 a := a.Println.OrderDescending.Println.ToArray

end.