10 REM SOLUTION OF SIMULTANEOUS LINEAR ALGEBRAIC EQUATIONS
20 DIM C(6,6),D(6),E(6,6),F(6),G(6),X(6)
30 MAT READ C,D
40 PRINT "COEFFICIENT MATRIX:"
50 MAT PRINT C
60 PRINT "RIGHT HAND SIDE:"
70 MAT PRINT D,
80 MAT E=INV(C)
90 MAT X=E*D
100 PRINT "SOLUTION VECTOR:"
110 MAT PRINT X,
120 MAT F=C*X
130 MAT G=D-F
140 PRINT "ERROR VECTOR:"
150 MAT PRINT G,
160 DATA 13,72,57,94,90,92,35,40,93,90,99,0 ,95,66
170 DATA 48,91,71,48,93,32,67,7 ,93,29,2 ,24,24,7
180 DATA 41,84,44,40,82,27,49,3,72,6,33,97,34,4
190 DATA 43,82,66,43,83,29,61,453,484,450,186,367,249,407
200 END

