PascalABC.NET 3.3.5, сборка 1659 от 09.04.2018
Внимание! Если программа не работает, обновите версию!
begin
var a:=MatrFill(5,5,0); a.Println(3); Writeln(15*'-');
a:=MatrFill(5,5,7); a.Println(3); Writeln(15*'-');
a:=MatrGen(5,5,(i,j)->2*(5*i+j)); a.Println(3); Writeln(15*'-');
a:=MatrRandom(5,5,0,99); a.Println(3); Writeln(15*'-');
a:=MatrGen(5,5,(i,j)->(i+1)*(j+1)); a.Println(3)
end.