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

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

Begin
var a:= ArrRandom(15,0,50);a.PrintLn;
Writeln(a.Where(t -> t < 50).Count);
end.

Пример:
16 38 2 12 48 5 18 12 27 12 48 5 6 43 28
15