var a,b: Matrix; begin a.SetIt(2,2,False,[1,2,3,4]); // a = [1, 2, 3, 4] b.Inv(a,0.01); // b = [1.0, 0.5, 0.3333, 0.25] b := Inv(a,0.01); end;