So I'm very new to this language, and programming in general, and as a sort of starter project I'm trying to program something to aid in solving for all sides of a right triangle, area and length, given any two pieces of information. It's completely basic mathematically, but involves a lot of code, at least how I've been making it. I keep getting syntax errors at the first If-Then argument, and I would really appreciate it if someone could tell me what I'm doing wrong.

Thanks!

EDIT: Problem was parenthesis. Works perfectly now.

:Disp "What is known?"

:Disp "1=yes"

:Disp "0=no"

:Disp "A=Area"

:Disp "L=Length"

:Input "Leg 1 A + Leg 2 A?",A

:If (A=1)

:Then

:(Input "Leg 1 A=",B

:Input "Leg 2 A=",C

:B+C>D

:Disp "Hypotenuse="

:Disp "A=",D

:Disp "L=",(√D)

:Goto 0)

:End

:Input "Leg 1 A + Leg 2 L?",E

:If (E=1)

:Then

:(Input "Leg 1 A=",F

:Input "Leg 2 L=",G

:F+(G^2)>H

:Disp "Hypotenuse="

:Disp "A=",H

:Disp "L=",(√H)

:Goto 0)

:End

:Input "Leg 1 A + Hyptn A?",I

:If (I=1)

:Then

:(Input "Leg 1 A=",J

:Input "Hypotenuse A=",K

:J-K>(-1*L)

:Disp "Leg 2="

:Disp "A=",(-1*L)

:Disp "L=",(-1*(√L))

:Goto 0)

:End

:Input "Leg 1 L + Hyptn A?",M

:If (M=1)

:Then

:(Input "Leg 1 L=",N

:Input "Hypotenuse A=",O

:(N^2)-O>(-1*P)

:Disp "Leg 2="

:Disp "A=",(-1*P)

:Disp "L=",(-1*(√P))

:Goto 0)

:End

:Input "Leg 1 A + Hyptn L?",Q

:If (Q=1)

:Then

:(Input "Leg 1 A=",R

:Input "Hypotenuse L=",S

:R-(S^2)>(-1*T)

:Disp "Leg 2="

:Disp "A=",(-1*T)

:Disp "L=",(-1*(√T))

:Goto 0)

:End

:Input "Leg 1 L + Hyptn L?",U

:If (U=1)

:Then

:(Input "Leg 1 A=",V

:Input "Hypotenuse L=",W

:(V^2)-(W^2)>(-1*X)

:Disp "Leg 2="

:Disp "A=",(-1*X)

:Disp "L=",(-1*(√X))

:Goto 0)

:End

:Disp "Sorry!"

:Lbl 0

:Disp "Problem Solved!"