Calculatrice

[invited71b4bf0]

bonsoir
y a t 'il quelqun qui peut me dire comment calculer DELTA ainsi que les racines d'un polynome de degré 2 ac la calculatrice

moi g une TI 84+
merci d'avance
-----

[invite5946359c]

Alors, beaucoup de possibilités s'offrent à toi. Par contre je tiens à te dire que si ce que tu cherchais c'était une fonction qui permette de le faire directement y a pas.
Tout d'abord regarde les applications que tu as sur ta calculatrice, il se peut que tu es polySmlt, qui te donne les éventuelles racines de ton polynôme de degré n. Si tu ne l'a pas tu peux la télécharger facilement sur le net, mais après je ne sais pas si tu vois comment faire pour le transférer sur la ti.
L'autre solution c'est de télécharger un programme tout fait sur le net, et de le transférer comme pour l'application, sauf qu'il y a de très forte chance pour que le programme ne soit que pour les polynômes de degré 2.
La troisième solution c'est te taper toi-même le programme, c'est sympa ça fait réfléchir, faire de la programmation en ti-basic.
La dernière c'est de recopier à la main un petit programme fait par moi ou un ami je sais plus, mais le risque de faire des erreurs en recopiant n'est pas négligeable. Et puis si tu ne sais pas où sont situées les commandes... Enfin je le mets quand-même, on sait jamais ça peut peut-être intéresser qqn :
ClrHome
Disp "AXÜ+BX+C"
Prompt A,B,C
"AXÜ+BX+C"üY�
ú20üXmin
20üXmax
ú20üYmin
20üYmax
DispGraph
BÜ-(4AC)üD
úB/(2A)üG
úD/(4A)üH
If G=iPart(G) and H=iPart(H):Then
"-"üStr1
If G<0
"+"üStr1
"+"üStr2
If H<0
"-"üStr2
abs(G)üG
abs(H)üH
Text(1,1,A,"XÜ+",B,"X+",C)
Text(8,1,"(X",Str1,G,")Ü",Str2 ,H)
Else
Text(1,1,A,"XÜ+",B,"X+",C)
End
Pause
ClrHome
Disp "DELTA:"
Disp D
If D<0
Disp "AUCUNE SOLUTION!"
If D=0:Then
Disp "UNE SOLUTION:"
(úB)/(2A)üI
Disp I
End
If D>0:Then
Disp "DEUX SOLUTIONS:"
(úB-ð(D))/(2A)üI
(úB+ð(D))/(2A)üJ
Disp I,J
End

[invite5946359c]

Bon je viens de m'apercevoir que certains caractères sont mal passé, s'il y en a d'intéressés par le programme envoyez-moi un message.

[poly71]

Bonsoir,

Tu peux essayer en utilisant la balise [code] pour insérer ton code, les caractères passeront peut être mieux.

[A voir en vidéo sur Futura]

[invite5946359c]

ClrHome
Disp "AXÜ+BX+C"
Prompt A,B,C
"AX^2+BX+C"->Y�
-20->Xmin
20->Xmax
-20->Ymin
20->Ymax
DispGraph
B^2-(4AC)->D
-B/(2A)->G
-D/(4A)->H
If G=iPart(G) and H=iPart(H):Then
"-"->Str1
If G<0
"+"->Str1
"+"->Str2
If H<0
"-"->Str2
abs(G)->G
abs(H)->H
Text(1,1,A,"X^2+",B,"X+",C)
Text(8,1,"(X",Str1,G,")^2",Str2,H)
Else
Text(1,1,A,"X^2+",B,"X+",C)
End
Pause 
ClrHome
Disp "DELTA:"
Disp D
If D<0
Disp "AUCUNE SOLUTION!"
If D=0:Then
Disp "UNE SOLUTION:"
(-B)/(2A)->I
Disp I
End
If D>0:Then
Disp "DEUX SOLUTIONS:"
(-B-(D)^(1/2))/(2A)->I
(-B+(D)^(1/2))/(2A)->J
Disp I,J
End

Voilà, alors faut remplacer les "^(1/2)" par le symbole de la racine carée mais normalement ça change rien, et de même le "^2" par le symbole du carré...

[invitea58a6ee3]

Le sujet n'est peut-être plus d'actualité, mais si ça intéresse quelqu'un : http://lartdutibasic.blogspot.com/20...n-trinome.html