PascalABC.NET 3.3.5, сборка 1659 от 09.04.2018
Внимание! Если программа не работает, обновите версию!
begin
var a:=MatrRandom(5,9,-47,87); a.Println(4)
end.
Пример
53 71 49 9 -19 -9 49 83 13
-41 35 33 -35 76 58 -21 69 60
-16 38 46 84 66 -42 -13 19 -29
-26 63 17 -3 59 16 56 -23 44
-21 53 -7 59 -12 72 -28 30 81
begin
var a:=MatrRandom(4,7,3,11); a.Println(3); (21*'-').Println;
a.Transform(t->t*t*t); a.Println(5)
end.
Пример
10 4 5 9 5 11 4
9 4 3 8 3 5 5
7 7 3 5 8 11 9
11 4 10 8 4 4 9
---------------------
1000 64 125 729 125 1331 64
729 64 27 512 27 125 125
343 343 27 125 512 1331 729
1331 64 1000 512 64 64 729
begin
var a:=MatrGen(3,4,(i,j)->Sqr(i+1)-2+j); a.Println(3)
end.
Результат
-1 0 1 2
2 3 4 5
7 8 9 10