probleme TI-83 plusFermé

Question

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

maxusn · Answer

svp a l'aide

maxusn · Answer

personne ?

T · Answer

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 [   -   ]

maxusn · Answer

j'ai essayer avec chacun des deux moins mais toujours le même problème peut être une faute dans le programme

igwan · Answer

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.

maxusn · Answer

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

maxusn · Answer

je cherche aussi un programme pouvant me donner la valeur de delta ce que fait pas celui-ci
j'ai essayer dans creer un mais je n'y arrive pas quelqu'un peut m'aider ?

JEANCLAUDE · Answer

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

maxusn · Answer

ok merci mais ou prendre Lbl C,Text et ø

JEANCLAUDE · Answer

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

maxusn · Answer

sa marche pas j'ai pas les bonnes valeurs

JEANCLAUDE · Answer

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.

Probleme TI-83 plus

12 réponses

Newsletters