===== PascalABC.NET =====
begin
var a := MatrRandom(3, 4, -99, 99);
a.Println;
Writeln;
a.Rows.Select(r -> r.Where(p -> p > 0).Sum).Println
end.
