Создать и напечатать одномерный массив случайными числами от 0 до 15 и вывести ** экран...

Question

Создать и напечатать одномерный массив случайными числами от 0 до 15 и вывести на экран те из них, которые больше первого элемента массива.

Answer 1

// PascalABC.NET 3.3, сборка 1633 от 10.02.2018
// Внимание! Если программа не работает, обновите версию!

begin
  var a:=ArrRandom(ReadInteger('n='),0,15); a.Println;
  a.Where(t->t>a.First).Println
end.

Пример
n= 15
8 8 9 3 5 10 12 4 1 8 8 6 13 7 6
9 10 12 13

Answer 2

Все решено и проверено мною.

---