Erreur Saut Casio 35+E
Bonjour à tous programmeur,
J'ai rentrer un programme pour calculer le discriminant delta.
Je rentre le programme je le teste plusieurs fois, il marche quand delta=0 mais autrement le programme ne marche pas et il met : "Erreur Saut"
Pourquoi ?
Voici le programme que j'ai copié :
tu peut faire ce programme pour les discriminants et delta
¤=triangle pour affiché (Shit+Vars+F5)
=>=Shift+Vars+F3+F3
:=Shift+Vars+F6+F5
Lbl=Shift+Vars+F3+F1
Goto=Shift+Vars+F3+F2
Stop=Shift+Vars+F2+F4
"entrer a"?->A
"entrer b"?->B
"entrer c"?->C
"delta=":b²-4*A*C->D¤
D=0=>Goto 1
D<0=>Goto 2
D>0=>Goto 3
lbl1
"une solution"
-B/(2*A)¤
Stop
Lbl 2
"aucune solution"
Stop
Lbl 3
"2 solutions"
"x1=":(-b-?D)/(2*A)¤
"x2=":(-b+?D)/(2*A)
pourquoi le programme ne marche pas.
J'ai rentrer un programme pour calculer le discriminant delta.
Je rentre le programme je le teste plusieurs fois, il marche quand delta=0 mais autrement le programme ne marche pas et il met : "Erreur Saut"
Pourquoi ?
Voici le programme que j'ai copié :
tu peut faire ce programme pour les discriminants et delta
¤=triangle pour affiché (Shit+Vars+F5)
=>=Shift+Vars+F3+F3
:=Shift+Vars+F6+F5
Lbl=Shift+Vars+F3+F1
Goto=Shift+Vars+F3+F2
Stop=Shift+Vars+F2+F4
"entrer a"?->A
"entrer b"?->B
"entrer c"?->C
"delta=":b²-4*A*C->D¤
D=0=>Goto 1
D<0=>Goto 2
D>0=>Goto 3
lbl1
"une solution"
-B/(2*A)¤
Stop
Lbl 2
"aucune solution"
Stop
Lbl 3
"2 solutions"
"x1=":(-b-?D)/(2*A)¤
"x2=":(-b+?D)/(2*A)
pourquoi le programme ne marche pas.
1 réponse
-
Bonjour
Vérifie que tu as bien mis les B en majuscule car ce n'est pas le cas dans le programme que tu as donner. Le point d'interrogation dans les 2 dernieres lignes doivent être des racines carrés mais c'est peut etre un problème d'affichage. Sinon ce programme marche parfaitement sur ma calculatrice.
L'erreur "Erreur Saut" est une erreur qui survient à cause des Goto et il faut aussi savoir que les Goto sont à éviter car ils rendent le code illisible et incomprehensible dans des programmes plus complexe. Pour résoudre une équation du second degré je te propose donc le programme suivant :
"entrer a"?->A
"entrer b"?->B
"entrer c"?->C
B²-4AC->D
ClrText
Locate 1,1,"delta="
Locate 7,1,D
If D<0
Then Locate 1,2,"aucune solution"
Else If D=0
Then Locate 1,2,"x="
Locate 3,2,(-B)/(2A)
Else Locate 1,2,"x1="
Locate 4,2,(-B-&D)/(2A)
Locate 1,3,"x2="
Locate 4,3,(-B+&D)/(2A)
IfEnd
IfEnd
J'ai remplacer la racine carré par le symbole &.
J'éspère avoir pu t'aider.
