Une version en 23 pas pour 41C:
Code : Tout sélectionner
01 LBL "MPO87"
02 LBL 01 2 RCL Y y^x 60912 - SQRT FRC x=0? XEQ 02 SIGN - GTO 01
15 LBL 02 CLA "X=" ARCL Y |-" Y=" ARCL L AVIEW STOP RTN
Modérateur : Politburo
Une version en 23 pas pour 41C:
Code : Tout sélectionner
01 LBL "MPO87"
02 LBL 01 2 RCL Y y^x 60912 - SQRT FRC x=0? XEQ 02 SIGN - GTO 01
15 LBL 02 CLA "X=" ARCL Y |-" Y=" ARCL L AVIEW STOP RTN
Bien vu ! Tu n'as pas besoin de ABS si tu remplaces AVIEW par PROMPT.
Code : Tout sélectionner
01►LBL "MPO87"
02 CLA ARCL X 2 RCL Y Y^X 60912 - SQRT ARCL X
11 FRC X=0? PROMPT RDN DSE X GTO "MPO87"
17 END
Code : Tout sélectionner
P4 LBL0 2 x^y MR00 - 60912 = ABS √ Min01 FRAC x=0? “ AR00 , AR01 ” DSZ GOTO0 24 steps