10 REM TEST FOR DET()
20 DATA 2,3,4,5,1,2,3,4,-3,-4,6,7,4,-1,-4,9
30 DIM A(3,3)
40 MAT READ A
50 PRINT "FIRST WE CALCULATE THE DETERMINANT = ";DET(A)
60 PRINT
70 PRINT "NOW WE INVERT THE MATRIX"
80 DIM C(3,3)
90 MAT C=INV(A)
100 PRINT "ORIGINAL MATRIX"
110 MAT PRINT A
120 PRINT "INVERTED MATRIX"
130 MAT PRINT C
140 PRINT "THE DETERMINANT IS =";DET
150 END

