Посчитать матрицы ab и ba
( 1 -3 2 )
a=( 3 -4 1 )
(2 -5 3 )
(2 5 6)
b=(1 2 5)
(1 3 2)

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

uses NumLibABC;

begin

 var A := new Matrix(3,3,1,-3,2,3,-4,1,2,-5,3);

 Writeln('*** A ***');

 A.Println(4,0);

 var B := new Matrix(3,3,2,5,6,1,2,5,1,3,2);

 Writeln('*** B ***');

 B.Println(4,0);

 Writeln('*** AB ***');

 (A*B).Println(4,0);

 Writeln('*** BA ***');

 (B*A).Println(4,0);

end.