Linear Equation Solver
by Daniel Bishop (danb2k@hotmail.com)
2000-10-09
This program solves the system of equations AX+BY=C and DX+EY=F. Simply enter the coefficients and the program will display X and Y.
Prgm_:SYSEQ
:Disp "AX+BY=C"
:Disp "A="
:Input A
:Disp "B="
:Input B
:Disp "C="
:Input "DX+EY=F"
:Disp "D="
:Input D
:Disp "E="
:Input E
:Disp "F="
:Input F
:AE-BD -> G
:If G=0
:Goto N
:(CE-BF)/G -> X
:(AF-CD)/G -> Y
:Disp "X="
:Disp X
:Disp "Y="
:Disp Y
:Stop
:Lbl N
:Disp "NO SOLUTIONS"