Autorisation : Membre
Nb de messages : 3738
Inscrit le : Lun 19 Oct 2009, 21:25
Posté le : Lun 02 Nov 2009, 23:26
Pour m'entraîner et en mémoire de mes vieux cours, j'ai deux programmes calculant le pgcd. Ca sert à rien d'un point-de-vu calcul vu que les caltos le font mais c'est fun.
L'un est l'algorythme d'Euclide et l'autre l'algorythme des soustractions.
A la base on doit entrer des valeurs décroissantes mais par un heureux hasard ça fonctionne quand même. Par contre ils ont parfois l'air instables
ALGEUC
Code
Normal
Flottant
Prompt A,B
While B
A-ent(A/B)*B->R
B->A
R->B
End
Disp A
ALGSOUS
Code
Normal
Flottant
Prompt A,B
abs(A-B)->C
Repeat C=B
If B>C
Then
B->E
C->F
End
If C>B
E-F->C
F->B
End
Disp F
EDIT 2011 : Repeat B=0 remplacé par While B
EDIT 2012 : titre du sujet corrigé ("algorythme")
---------------------- 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)
