Forum

Catégorie : Programmes
Forum : Les programmes des internautes
Vues : 723
Réponses : 2
Type : discussion
Etat : réponses autorisées

Equations de droites obliques (mx+p)

ashtrail le 22/03/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.
linkakro le 22/03/2012 à 17:15
La fonction ">Frac" s'utilise de la manière suivante : A>Frac

Histoire d'aller à l'essentiel :
Code
Disp "A(A,B) B(C,D)
Prompt A,B,C,D
(D-B)/(C-A
Disp "Y=MX+P : M,P",Rép>Frac,B-RépA>Frac
Pour fous comme moi :
Code
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
ashtrail le 22/03/2012 à 17:21
OK merci bien.