Ci joint le programme :
- Code: Tout sélectionner
Input "SAISIR A= ",A
Input "SAISIR B= ",B
(A+B)2→C
Input "SAISIR EPS= ",E
While (B-A)>E
If Y₁(A)*Y₁(B)<0
Then
B→C
Else
If Y₁(A)*Y₁(B)>0
Then
A→C
Else
Disp "C=",C
Goto ZZ
End
End
End
Disp "A=",A
Disp "B=",B
Lbl ZZ
(Le erreur vient du fait que j'ai moi même arrêté le programme, sans quoi, il tournerait des heures)