FLOAT
NORMAL
CLRHOME
DISP "1. A^2 OR B^2","2. C^2
INPUT "#:",A
ABS IPART A -> A
IF A=2:Goto A
IF A not= 1:RETURN
INPUT "C2:",C
INPUT "A^2 OR B^2",B
DISP C-B,squareroot(C-B
RETURN
LBL A
INPUT "A2:",C
INPUT "B2:",B
DISP C+B,squareroot(C+B
RETURN