Autorisation : Membre
Nb de messages : 149
Inscrit le : Jeu 13 Oct 2011, 15:48
Posté le : Jeu 22 Mar 2012, 16:50
Voici un petit prog qui sert à calculer l'équation d'une droite de type mx+p grâce au coordonées de deux points de cette droite (sûrement améliorable).(172 de memoire il s'appelle "droites".) -> = sto
Code
:EffEcr
:Output(1,1,"A(A,B)? // il s'agit ici des coordonées du 1er point les variables étant A et B
:Pause
:EffEcr
:Prompt A,B
:EffEcr
:Output(1,1,"B(C,D)? // pareil ici les variables sont C et D
:Pause
:EffEcr
:Prompt C,D
:EffEcr
:(B-D)/(A-C)->M
:B-AM->P
:Disp "MX+P,M=",M,"P=",P
:Pause
:EffEcr
Le probleme c'est quand c'est un nombre décimal je n'arrive pas a faire Frac>M ou Frac>P donc il faut ensuite taper M regarder le résultat et faire Frac> (dans le menu math) si vous pouviez résoudre ce problème ce serait bien merci.
Disp "A(A,B) B(C,D)
Prompt A,B,C,D
{A,C->L1
{B,D->L2
RégLin(ax+b) L1,L2
Disp a>Frac,b>Frac // a et b dans le menu var/statistique
---------------------- 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)