4094
609@X;>@QQ@,D15!$
3
3840@C?7,L>6?6??+???@=I;
1344J"THIS PROGRAM SOLVES FOR THE ROOOTS OF A"%@U@T"QUADRATIC EQUATION.  PLEASE INPUT THE FOLLOWING:"%U@V"VALUE OF A"
U@XT@AW@U@Z"VALUE OF B"
U@\T@DW@U@^"VALUE OF C"
U@ T@GW@U@"%U@
P@D@P?<@E@P?9P@ACP@GCBQ@JU@(P@A@P?6(F@ZBEU@-"THIS IS A FIRST DEGREE EQUATION."%U@/YD@U@2"THE ROOTS ARE"
@U@7P@J@P?6(D@ZCHU@8%U@:P@J@P?6(A@ZB<U@<P@DFP@J)FAP?<P@ACD!%@U@>P@DFP@J)FBP?<P@ACD!%@UAAYD@UAFP@D@P?<DP@ACF!%UAKYD@UAP"IMAGINARY"%@UARP@D@P?<DP@ACF!
" + "
P@JF)F@P?<DP@AC!
" *I"%@UATP@D@P?<DP@ACF!
" - "
P@JF)F@P?<DP@AC!
" *I"%@UAZO
0
1052
0PT
0=@);" - ";SQR(-R)/2*A;" *I" 
90 END