Задан числовой массив, состоящий из 15 элементов. подсчитать и вывести на экран количество элементов в массиве, которые меньше его первого элемента.

// PascalABC.NET 3.3

begin
  var a:=ArrRandom(15,10,90); a.Println;
  writeln('количество элементов, которые меньше первого элемента = ',
   a.Where(x->x<a[0]).Count);
end.

Пример:
70 87 27 66 77 12 80 27 87 89 64 86 75 12 44
количество элементов, которые меньше первого элемента = 7