Salut, j'aimerai crée un programme avec ma TI-82 pour calculer le discriminant delta ainsi que les racines.
Quelqu'un peut m'aider ???
ClrHome
Disp "ETUDE DU TRINOME"," aX²+bX+c"
Prompt A,B,C
‾B/(2A)→S
"A*X^2+B*X+C"→Y1
Y1(S)→T
B^2-4A*C→D
ClrHome
Disp "DISCRIMINANT=",D
If D>0
Then
Disp "2 RACINES :"
(‾B-√(D))/(2A)→U
(‾B+√(D))/(2A)→V
Disp U►Frac,V►Frac
Pause
Goto 0
Else
If D=0
Then
Disp "1 RACINE :"
Disp S►Frac
Goto 0
Else
Disp "PAS DE RACINE."
Pause
Goto 0
Lbl 0
ClrHome
Disp "SOMMET EN (X,Y):",S►Frac,T►Frac
Pause
Menu("TRACER LA COURBE ?","OUI",1,"NON",2
Lbl 2
Stop
Lbl 1 DispGraph