/0CHOICXYXYRNUTOAMACNTO @Z;@,d +n%( (%( x+(+( . GREATEST COMMON DENOMINATOR}*(*( . PRIME FACTORS OF INTERGERS$($( . LINEAR INTERPOLATION(( . QUADRATIC ROOTS&(&( . SIMULTANEOUS EQUATIONS+(+( . PERMUTATIONS & COMBINATIONS#(( ENTER YOUR CHOICE#"@A"@A"@AP"@A"@A"@A APCHOICE UNKNOWNGREATEST COMMON DENOM.2 +(2( ԠΠ&(&( ENTER 0,0 TO EXIT ROUTINE%(( ENTER TWO NUMBERS%"AEXIT 6-O:,6-O:,6-&$P:',"Ap 6- 6-  A@%("( GR. COMM. DENOM. = %( A , PRIME FACTORS OF INTERGERS61 +(1( ŠӠƠ@(( ENTER 0 TO EXITJ#(( INPUT YOUR NUMBER#O"AP&6-6-&SAVE FOR TOTALT( N:,U 6-N:,Y 6-O:,[6-P:M:,%?,%@^-@@`6-%@c6-h'P:',Ar 6-'|6-%@ A`"A ("@  6-( A    6-P:?%#, 6-$"' A0'"@6-%@' AR  (  A0LINEAR INTERPOLATION+ +(+( Ҡ,(&( ENTER X,Y OF FIRST POINT,-('( ENTER X,Y OF SECOND POINT->(( FIND X OR Y>7@<@,4XAp#(( : X = #6-%+&,'+&,$+&,/(/( Y = P:$A%?P,'A+('( MORE POINTS ON THIS LINE+$$7@<@,4YA)(%( INTERPOLATE A NEW LINE)&$$7@<@,4YAp0 A:#(( : Y = #D6-%+&,'+&,$+&,N/(/( X = P:$A%?P,'AS A XQUADRATIC ROOTS]& +(&( àb%(%( ENTER COEFFICIENTS A,B,Cl v6-+$,&+@$$,6-M:O:,, AE(E( REAL ROOTS: +6&,'+@$,, +6%,'+@$,(( ANY MORE DATA$$7@<@,4YA AH(H( COMPLEX ROOTS: 6'+@$, + OR -'+@$, I ApSIMULTANEOUS EQUATIONS0 +((0( Ӡ9@ <@,(($( # EQUATIONS? (LIMIT 9)(" A ( ( COEFFICIENT MATRIX:-@( EQUATION -@%@"%@A!!( COEFFICIENT  =   A( CONSTANT =  68<,-* 4 >-@H -R8<,A\ f ( ( ϠŠήp A z-@%@6-8<,68<,-8<,68<,- 6-@'8<,-@%@68<,-$8<, -@"A@GOTO NEXT I6-68<,-@%@68<,-8<,%$8<,   $-@.AA( VAR() = P:8<%@,$A%?P,'A8 B A LPERM & COMB.V4 +(4( `#(#( ENTER 0 TO END PROGRAMj)(%( TOTAL NUMBER OF OBJECTS)t"A~"(( SIZE OF SUBGROUP"* ! ( THAT'S TOO MANY.* A06-@6-@-&%@o'!A ((( MORE THAN 9.9E95 PERMUTATIONS. A0 6-$ -@ 6-$ ( PERMUTATIONS = ( COMBINATIONS = ' ( A0 D:MATHPKG