Ti80.Online

Pour plus de programmes...
http://www.ti80.online.fr
ti80@citeweb.net
-----------------------------------

Ce programme est vraiment très pratique mais évitez de mettre
pour dénominateur communs des chiffes supérieurs à 100 sinon
c'est interminable...
J'ai essayé avec 2000 et 2001, ça prend 3 bonnes minutes :(
Comment ça marche ?: Vous entrez deux dénominateurs, puis la
calculatrice trouvera...



:CLRHOME
:INPUT "1er DEN",A
:INPUT "2nd DEN",B
:FOR(X,1,B)
:IF FPART (AX/B - Attention : FPART : MATH > NUM > 3
:END
:DISP "+ PETIT DEN:",AX