10 CLS:PRINT “MENGHITUNG DETERMINANT ORDO 3″
20 PRINT “DETERMINANT:”;PRINT
30 PRINT “A B C”
40 PRINT “D E F”
50 PRINT “G H I”:PRINT
60 PRINT “HARGA A:”;INPUT A
70 PRINT “HARGA B:”;INPUT B
80 PRINT “HARGA C:”;INPUT C
90 PRINT “HARGA D:”;INPUT D
100 PRINT “HARGA E:”;INPUT E
110 PRINT “HARGA F:”;PRINT F
120 PRINT “HARGA G:”;PRINT G
130 PRINT “HARGA H:”;INPUT H
140 PRINT “HARGA I:”;INPUT I
150 DET+=A*E*I+B*F*G+C*D*H
160 DET-=C*E*G+A*F*H+B*D*I
170 DET=DET+-DET-
180 PRINT “DETERMINANT=”;USING”###.##”;DET
190 END