Для двумерного массива целых чисел размерностью 5 на 5/ Отыскать среднее

// PascalABC.NET 3.3

begin
 var a:=MatrRandom(5,5,-10,10); a.Println(5);
 writeln(a.ElementsByRow.Where(x-gt;xgt;0).Average);
end.

Пример:
   -3    2  -10   -5   -6
   -1    0    4   -6    4
    4   -4    3   -5    6
    6  -10    4    2   -7
    8   -6    9   -3   -1
4.72727272727273