Poster un nouveau sujet Poster une réponse
fonction canonique
Auteur Message
tapenad



Autorisation : Membre
Nb de messages : 225
Inscrit le : Jeu 17 Nov 2011, 13:20
Posté le : Mar 24 Avr 2012, 17:49   Citer 

Voici un prgm utile fait en cours de math qui donne la fonction canonique d'une fonction du polynome au degré 2 ( si vous ne comprener pas wiki est votre ami).
Il est peut-être déja fait mais tant pis car il est cours et efficace.

Code
:EffEcr
:Disp "AX²+BX²+C"
:Pause
:Prompt A,B,C
:-B/(2A)->Z
:A*Z²+B*Z+C->X
:EffEcr
:Output(1,1,A
:Output(1,3,"X-
:Output(1,6,Z
:Output(1,9,")²
:Output(1,11,X
:Pause


Si les valeurs de W et Z ( alpha et beta ) sont trop grandes ça risque de faire moche à la fin mais c'est un détail.

Ce prgm peut vous sauver la vie en compo de math.Testez-le.

----------------------
L’erreur est humaine, mais pour provoquer une vraie catastrophe, il faut un ordinateur.

je suis premier!!!

je m'aime.
 Adresse email Haut de page Bas de page 
 
linkakro



Autorisation : Membre
Nb de messages : 3767
Inscrit le : Lun 19 Oct 2009, 21:25
Posté le : Mar 24 Avr 2012, 19:37   Citer 

Il peut aider comme toute autre anti sèche.
Cepandant il doit manquer une partie de la mise en page.
Autre version. (rectifictation de la mise en page, et réduction du code).

Code
Disp "AX^2+BX+C=0
Prompt A,B,C
-B/(2A)->Z
A*Z²+B*Z+C->X
EffDessin
Texte(0,0,A,"*(X-",Z,")²+",X



----------------------
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 
 
ppp
Invité
Posté le : Jeu 13 Nov 2014, 13:55   Citer 


Citer : linkakro
Il peut aider comme toute autre anti sèche.
Cepandant il doit manquer une partie de la mise en page.
Autre version. (rectifictation de la mise en page, et réduction du code).

Code
Disp "AX+BX+C=0 ?!! error AX² ..!
Prompt A,B,C
-B/(2A)->Z
A*Z²+B*Z+C->X
EffDessin
Texte(0,0,A,"*(X-",Z,")²+",X


Une petite erreur sur la première ligne , il me semble :
Disp "AX²+BX+C=0

EDIT linkakro: oui et merci. J'ai aussi nettoyé les messages ratés.

  Haut de page Bas de page 
 
inconnue
Invité
Posté le : Dim 30 Nov 2014, 15:03   Citer 

Le programme ne fonctionne pas pour moi, pourtant j'ai tapé exactement le programme, est ce normal ?

  Haut de page Bas de page 
 
linkakro



Autorisation : Membre
Nb de messages : 3767
Inscrit le : Lun 19 Oct 2009, 21:25
Posté le : Dim 30 Nov 2014, 17:11   Citer 

Résultat faux ou plantage ? Quel type d'erreur si ça plante ? C'est pas pareil, soit précis.

J'ai vérifié, testé et refais le programme plus simplement sans problème.

Je te refais ça en plus simple.

Code
Disp "AX^2+BX+C
Prompt A,B,C
-B/(2A->G
AG^2+BG+C->H
Disp "A*(X-G)^2+H
Disp "G",G,"H",H

Et les justification pour pas les refaire plus tard
Citer : "justification par linkakro"
P[x]=
=a(x-g)^2+h
=ax^2-2agx+ag^2+h
=ax^2+bx+c

b=-2ag
c=ag^2+h

g=-b/(2a)

h=c-ag^2
h=c-a(-b/(2a))^2
h=c-ab^2/(4a^2)
h=c-b^2/(4a)
h=(4ac-b^2)/(4a)
on a donc la formule brute, mais on peut faire plus simple comme dans le programme initial de cette discussion

P[g] = a(g-g)^2+h = h = ag^2+bg+c
d'après les deux expressions de P[x] et le terme annulé en x=g



----------------------
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 
 
Google_AdSense



Publicité    



 
Poster un nouveau sujet Poster une réponse





  Powered by Fire-Soft-Board v1.0.10 © 2004 - 2024 Groupe FSB
Page générée en 9 requêtes
BlackOne par Grimmlink