Hey everyone! This is my first post and first day dabbling into TI programming. I am having difficulties with a program I tried to make. I saw a video where a guy makes a program that solves systems of equations but I found his code to be painstakingly tedious and unnecessary so I tried to make my own. It pretty much works flawlessly except for the fact that Y comes out to be 0. I used the system of equations in this video to test the program out. At the home screen I hit L/J and it gives me 2, which is the right answer, but for some reason Y keeps coming out to 0, no matter how hard I've tried to fix it. Any help would be appreciated. Thank you! Here is the code:
Code:
Code:
Lbl 3
prgmNULL
Disp "X1:"
Input " ",A
Disp "X2:"
Input " ",B
Disp "X3:"
Input " ",C
{A,B,C->L1
Disp "Y1:"
Input " ",D
Disp "Y2 "
Input " ",E
Disp "Y3:"
Input " ",F
{D,E,F->L2
Disp "Z1:"
Input " ",G
Disp "Z2:"
Input " ",H
Disp "Z3:"
Input " ",I
{G,H,I->L3
List>matr(L1,L2,L3,[A])
Disp "Answer 1:"
Input " ",A
Disp "Answer 2:"
Input " ",B
Disp "Answer 3:"
Input " ",C
{A,B,C->L4
det([A])->J
List>matr(L4,L2,L3,[A])
det([A])->K
List>matr(L1,L4,L3,[A])
det([A])->L
List>matr(L1,L2,L4,[A])
det([A])->M
(K/J)->X
(L/J)->Y
(M/J)->Z
Text(1,1,"X = ",X)
Text(16,1,"Y = ",Y)
Text(32,1,"Z = ",Z)
Pause
Menu("Solve Another System?","Yes",3,"No",4)
Lbl 4
ClrHome
Stop