Poster un nouveau sujet Poster une réponse
[Math] Equation du 2nd degré, LE programme !
Auteur Message
Rhumkill



Autorisation : Membre
Nb de messages : 4
Inscrit le : Dim 09 Déc 2012, 7:45
Posté le : Sam 27 Avr 2013, 14:40   Citer 

Salut à tous,
Je vous présente mon nouveau programme permettant de résoudre les équations du second degrés. Il ne pèse 375 octets pour beaucoup de fonctionnalité !

Fonctionnalités :
Détermine à partir de la forme canonique, factorisé ou développé :
- Alpha
- Beta
- A/B/C
- Delta
- Les racines

code :

Code
:Menu("menu","factorise",1,"developpe",2,"canonique",3)
:lbl 1
:prompt a
:input "x1:",u
:input "x2:",v
:-av-au->b
:auv->c
:goto 3
:lbl 2
:Prompt a,b,c
:lbl 3
:(-b)/(2a)->y
:ay²+by+c->z
:goto 5
:lbl 4
:prompt a
:Input "alpha:",y
:input "beta:",z
:-2ya->b
:y²a+z->c
:lbl 5
:Disp "a",a
:Disp "b",b
:Disp "c",c
:b²-4ac->d
:pause
:Disp "alpha",y
:Disp "beta",z
:pause
:Disp "delta:",d
:pause
:disp "Racine(s)"
:if D>0:then
:(-b-V(d))/(2a)->u
:(-b+V(d))/(2a)->v  // ici V c'est Racine carré
:Disp "x1:",u
:Disp "x2:",v
:end
:if d=0
:Disp "alpha",y
:if d<0
:Disp "Pas de racine"



Il vous permettra de gagner beaucoup de temps dans les études de fonctions et de vérifier vos réponses. Enjoy it ! bigmouth.gif

 Adresse email Haut de page Bas de page 
 
pito
Invité
Posté le : Sam 27 Avr 2013, 15:16   Citer 

Oui il marche et il est bien. cupsmiley.gif

  Haut de page Bas de page 
 
linkakro



Autorisation : Membre
Nb de messages : 3738
Inscrit le : Lun 19 Oct 2009, 21:25
Posté le : Sam 27 Avr 2013, 16:08   Citer 

Cela fait plaisir de voir quelqu'un qui élabore ses applications de formulaires tout seul.
En plus ce programme est pratique.

Mais à quoi sert le Lbl 4 qui ne reçoit aucun Goto ni le menu ?
Je crois que le menu doit pointer vers 4 au lieu de 3.

J'aime bien quand le programme rappelle l'équation dont on identifie les paramètres. J'ajoûterai des Disp en conséquence.

Soit plus attentif à la casse du code. Les majuscules/minuscules ne sont pas toutes disponibles sur ti82(stat(fr)), et des copier/coller peuvent être facilités, cela augmente l'intérêt qu'on y porte.


Code
:Menu("DEPART","FACTORISE",1,"DEVELOPPE",2,"CANONIQUE",4
:Lbl 1
:Disp "A(X-U)(X-V)
:Prompt A
:Input "x1:",U
:Input "x2:",V
:-AV-AU->B
:AUV->C
:Goto 3
:Lbl 2
:Disp "AX²+BX+C
:Prompt A,B,C
:Lbl 3
:(-B)/(2A)->Y
:AY²+BY+C->Z
:Goto 5
:Lbl 4
:Disp "A(X-ALPHA)²+BETA
:Prompt A
:Input "ALPHA:",Y
:Input "BETA:",Z
:-2YA->B
:Y²A+Z->C
:Lbl 5
:Disp "A",A
:Disp "B",B
:Disp "C",C
:B²-4AC->D
:Pause
:Disp "ALPHA",Y
:Disp "BETA",Z
:Pause
:Disp "DELTA:",D
:Pause
:Disp "RACINE(S)"
:If D>0:Then
:(-B-V(D))/(2A)->U
:(-B+V(D))/(2A)->V  // ici V c'est Racine carré
:Disp "x1:",U
:Disp "x2:",V
:End
:If D=0
:Disp "ALPHA",Y
:If D<0
:Disp "PAS DE RACINE"



----------------------
ti82statfr: 2008, inscrit: 2009, ti84pocketfr: noël2011, ti30xbmultiview: iut 2012-2014
Perfectionniste, manque tact. Pas le temps de tout publier depuis 2011. Répond toujours aux questions. (rédigé juin 2014)

Pour tout le monde et surtout les débutants, quelques-uns des articles courants :
*Traductions Algorithmie/Ti-Basic.
*Caractères spéciaux sur Tout82
Les défauts du TI-Basic : Goto_versus_algo et DelVar/End/Lbl/guillemet/store
 Adresse email Haut de page Bas de page 
 
Rhumkill



Autorisation : Membre
Nb de messages : 4
Inscrit le : Dim 09 Déc 2012, 7:45
Posté le : Sam 27 Avr 2013, 18:52   Citer 


Citer
Mais à quoi sert le Lbl 4 qui ne reçoit aucun Goto ni le menu ?
Je crois que le menu doit pointer vers 4 au lieu de 3.


Oui c'est une erreur de frappe.


Citer
Soit plus attentif à la casse du code. Les majuscules/minuscules ne sont pas toutes disponibles sur ti82(stat(fr)), et des copier/coller peuvent être facilités, cela augmente l'intérêt qu'on y porte.


En effet, personnellement je n'ai pas le matériel pour copier/coller donc je n'y ai pas pensé, je ferais attention la prochaine fois.

 Adresse email Haut de page Bas de page 
 
Poster un nouveau sujet Poster une réponse





  Page générée en 6 requêtes