Написать программу,которая обретает на массиве из 10 элеменотов заполненное числами от

Паскаль?

// PascalABC.NET 3.3, сборка 1627 от 27.01.2018

// Внимание! Если программка не работает, обновите версию!

begin

  var mas:=ArrRandom(10,1,100); mas.Println;

  var x:=mas.Average; 

  Writeln('количество элементов меньше среднего=',mas.Where(t-gt;t lt; x).count);

end.