Найти сумму квадратов положительных членов матрицы MXN

PascalABC.NET 3.4.0, сборка 1672 от 10.06.2018Внимание! Если программа не работает, обновите версию!begin  var (m,n):=ReadInteger2('Количество строк и столбцов в матрице:');  Writeln('*** Исходная матрица ***');  var a:=MatrRandom(m,n,-99,99);   a.Println(4); Writeln(4*a.ColCount*'-');  Writeln('Сумма положительных ',a.ElementsByRow.Where(t->t>0).Sum)end.