Probleme TI-83 plus
maxusn
Messages postés
47
Statut
Membre
-
JEANCLAUDE -
JEANCLAUDE -
Bonjour,pouvez vous m'aider a corriger ce programme que le prof nous a passé pour que je puisse resoudre les equations de second degré
B²-4*a*c-->D
if D<0
then
disp "pas de solution"
elss
if D=0
then
disp -B/(2*a)
else
disp (-b+"racine carré"D)/(2*A),(-b -"racine carré"D)/(2*A)
end
end
quand je fait executer sa me dit erreur donc je fait goto et sa me ramene a cette ligne
disp (-b+"racine carré"D)/(2*A),(-b -"racine carré"D)/(2*A)
il doit donc y avoir une erreur ici ?
merci pour vos reponses
B²-4*a*c-->D
if D<0
then
disp "pas de solution"
elss
if D=0
then
disp -B/(2*a)
else
disp (-b+"racine carré"D)/(2*A),(-b -"racine carré"D)/(2*A)
end
end
quand je fait executer sa me dit erreur donc je fait goto et sa me ramene a cette ligne
disp (-b+"racine carré"D)/(2*A),(-b -"racine carré"D)/(2*A)
il doit donc y avoir une erreur ici ?
merci pour vos reponses
12 réponses
Ptet que le moins "-" avant le B de cette ligne est celui pour l'opération et non le moins "(-)" à gauche de ENTER
Utilise [ (-) ]
et pas [ - ]
Utilise [ (-) ]
et pas [ - ]
Ca fait longtemps que je n'ai plus fait de ti-basic mais
disp (-b+"racine carré"D)/(2*A)
disp (-b -"racine carré"D)/(2*A)
ne marche pas non plus ?
Et quel erreur a tu au fait soit plus clair.
disp (-b+"racine carré"D)/(2*A)
disp (-b -"racine carré"D)/(2*A)
ne marche pas non plus ?
Et quel erreur a tu au fait soit plus clair.
Voila qui devrait t'aider. si tu veut le fichier .8xp demande moi je te l'enverai par mail.
Lbl C
ClrDraw
Prompt A
Prompt B
Prompt C
B²-4AC->D
Text(0,0,"DELTA="
Text(0,24,D)
If D>0:(-B-RACINE(D))/(2A)->S
If D>0:(-B+RACINE(D))/(2A)->T
If D>0:Text(12,0,"X1=(-B-RACINE(D))/2A"
If D>0:Text(18,0,"X2=(-B+RACINE(D))/2A"
If D>0:Text(24,0,S)
If D>0:Text(30,0,T)
If D=0:-B/(2A)->S
If D=0:Text(12,0,"X=-B/2A"
If D=0:Text(18,0,S)
If D<0:(-B-i*RACINE(-D))/(2A)->S
If D<0:Text(12,0,"X1=(-B-i*RACINE(-D))/2A"
If D<0:(-B+i*RACINE(-D))/(2A)->T
If D<0:Text(18,0,"X2=(-B+i*RACINE(-D))/2A"
Pause
Disp "X1="
Pause S
If Dø0:Disp "X2="
If Dø0:Pause T
Goto 1
Lbl C
ClrDraw
Prompt A
Prompt B
Prompt C
B²-4AC->D
Text(0,0,"DELTA="
Text(0,24,D)
If D>0:(-B-RACINE(D))/(2A)->S
If D>0:(-B+RACINE(D))/(2A)->T
If D>0:Text(12,0,"X1=(-B-RACINE(D))/2A"
If D>0:Text(18,0,"X2=(-B+RACINE(D))/2A"
If D>0:Text(24,0,S)
If D>0:Text(30,0,T)
If D=0:-B/(2A)->S
If D=0:Text(12,0,"X=-B/2A"
If D=0:Text(18,0,S)
If D<0:(-B-i*RACINE(-D))/(2A)->S
If D<0:Text(12,0,"X1=(-B-i*RACINE(-D))/2A"
If D<0:(-B+i*RACINE(-D))/(2A)->T
If D<0:Text(18,0,"X2=(-B+i*RACINE(-D))/2A"
Pause
Disp "X1="
Pause S
If Dø0:Disp "X2="
If Dø0:Pause T
Goto 1
Pas de panique...
1) lorsque tu ne trouve pas un truc tu peux chercher dans le catalog (touche 2nd puis 0)
2)
LBL se trouve uniquement lorsque tu es dans l'éditeur de programme et que tu appui sur la touche PRGM (9:Lbl)
TEXT c'est la touche 2nd puis PRGM (DRAW) il se trouve tout en bas de la liste (0:Text()
ø c'est le signe différent que je n'ai pas su mettre sur ce pc qui se trouve en faisant 2nd puis MATH (TEST) c'est le 2eme de la liste.
Bonne chance
1) lorsque tu ne trouve pas un truc tu peux chercher dans le catalog (touche 2nd puis 0)
2)
LBL se trouve uniquement lorsque tu es dans l'éditeur de programme et que tu appui sur la touche PRGM (9:Lbl)
TEXT c'est la touche 2nd puis PRGM (DRAW) il se trouve tout en bas de la liste (0:Text()
ø c'est le signe différent que je n'ai pas su mettre sur ce pc qui se trouve en faisant 2nd puis MATH (TEST) c'est le 2eme de la liste.
Bonne chance
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
Les seules rectification que je peut te donner c'est rajouter ces lignes avant la premiére ligne du programme et d'effacer le contenu des equations dans Y=
AxesOff
ClrDraw
0->Xmin
94->Xmax
62->Ymax
1->Xscl
1->Yscl
ces lignes en plus ne change pas les resultats mais évite simplement qu'il reste des choses sur ton ecran (sa te déregle la config de tes graphs a toi de remettre la bonne config lorsque tu veut utiliser les graphiques)
Mais pour les résultats et bien vérifie tes équations ((-B-RACINE(D))/(2A)->S ) tu as peut etre commis une erreur de signe, j'ai vérifier ce que j'ai écrit plus haut et je ne voit pas d'erreur.
Normalement le programme commence par t'afficher la formule qui va bien avec ton cas soit D>0 D=0 ou D<0 puis il t'affiche les deux résultat X1 et X2 dans le Graph et te les réecrit dans Home car il ne peut pas écrire les imaginaire i dans le graph (dans le cas ou Delta<0) donc lorsqu il fonctionnera bien tu pourra modifier sa qui est inutile If D<0:Text(12,0,"X1=(-B-i*RACINE(-D))/2A", moi je n'ai pas le temps en ce moment je fini un programme plus complexe qui résume tous les cours de bts systéme électronique. Par contre la impossible de le copier a la main il prend toute la place de la ti 83...il faut le cable.
AxesOff
ClrDraw
0->Xmin
94->Xmax
62->Ymax
1->Xscl
1->Yscl
ces lignes en plus ne change pas les resultats mais évite simplement qu'il reste des choses sur ton ecran (sa te déregle la config de tes graphs a toi de remettre la bonne config lorsque tu veut utiliser les graphiques)
Mais pour les résultats et bien vérifie tes équations ((-B-RACINE(D))/(2A)->S ) tu as peut etre commis une erreur de signe, j'ai vérifier ce que j'ai écrit plus haut et je ne voit pas d'erreur.
Normalement le programme commence par t'afficher la formule qui va bien avec ton cas soit D>0 D=0 ou D<0 puis il t'affiche les deux résultat X1 et X2 dans le Graph et te les réecrit dans Home car il ne peut pas écrire les imaginaire i dans le graph (dans le cas ou Delta<0) donc lorsqu il fonctionnera bien tu pourra modifier sa qui est inutile If D<0:Text(12,0,"X1=(-B-i*RACINE(-D))/2A", moi je n'ai pas le temps en ce moment je fini un programme plus complexe qui résume tous les cours de bts systéme électronique. Par contre la impossible de le copier a la main il prend toute la place de la ti 83...il faut le cable.
j'ai essayer avec chacun des deux moins mais toujours le même problème peut être une faute dans le programme
c'est bon j'ai trouver il fallait écrire
disp (-b+"racine carré"D))/(2*A)
disp (-b -"racine carré"D))/(2*A)
enfaite il fallait refermer 2 fois la parenthèse
merci pour vos reponses
disp (-b+"racine carré"D))/(2*A)
disp (-b -"racine carré"D))/(2*A)
enfaite il fallait refermer 2 fois la parenthèse
merci pour vos reponses
