===== PascalABC.NET =====

begin

 var a := MatrRandom(6, 6, -10, 10);

 a.Println;

 var s := a.ElementsByRow;

 Print('Сумма нечетных отрицательных:',

     s.Where(p -> p.IsOdd and (p < 0)).Sum,

     'Кол-во положительных кратных 5:',

     s.Count(p -> (p > 0) and (p mod 5 = 0)))

end.