var A,B,C: TMtxInt; begin CreateIt(A,B,C); try A.SetIt(2,2,[1,2, 2,4]); B.SetIt(2,2,[1,2, 2,4]); C.MulElem(A,B); // C becomes: // [1, 4, // 4,16] finally FreeIt(A,B,C); end; end;