Gamme TI-82


Poster un nouveau sujet Poster une réponse
résolution d'équations diophantiennes.
Auteur Message
vibra
Avatar

Autorisation : Membre
Nb de messages : 595
Inscrit le : Mer 04 Avr 2007, 13:29
Posté le : Mer 24 Oct 2007, 15:11   Citer 

Programme destiné aux spé maths. Il s'agit d'un procédé itératif qui donne toutes les solutions d'une équation diophantiennes (de la forme ux+vy=p) entre deux valeurs choisies (G et D). Le compteur indique la valeur qu'elle est entrain de calculer, elle part donc de G pour aller jusqu'a D.

Code
Disp "UX+VY=P
Input"U=",U
Input "V=",V
Input "P=",P
Input "G=",G
Input "D=",D
"(P-UX)/V"->Y1
ClrHome
For (X,G,D
Output (1,1,X
If Y1(X)=iPart(Y1(X
Then
Disp x,Y1(X),"
Pause
End
End
""->Y1



----------------------
Vive la programmation et vive le vibraphone !!!
 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 - 2019 Groupe FSB
Page générée en 9 requêtes
BlackOne par Grimmlink