Написать программу которая вычисляет количество элементов одномерного массива, меньших 10. массив состоит из 15 целых элементов

PascalABC.NET

begin

 var a := ReadArrInteger(15);  // вводим 15 элементов

 a.Count(p -> p < 10)    // подсчитываем те которыве меньше 10

     .Println                     // и выводим результат

end.