дан одномерный массив а1, а2 ... аn. посчитать среднее значение частей

// PascalABC.NET 3.3
begin
  var a:=ArrRandom(20,1,50); a.Println;
  Write('среднее значение частей массива, значение которых превышают 10 = ',
  a.Where(x-gt;xgt;10).Average);
end.

Пример:
44 1 2 4 5 50 41 1 14 41 17 21 2 11 31 39 19 50 4 35
среднее значение частей массива, значение которых превышают 10 = 31.7692307692308