TI 82 et + Casio Graph 65 et +
:Lbl 1 :ClrHome :Input A :Input B :A->A abs B->B :If B<A :Goto 2 :A->C :B->A :C->B :Lbl 2 :-(int (A/B)*B-A)->C :If C=0 :Goto 3 :B->A :C->B :Goto 2 :Lbl 3 :Disp B :Pause :Goto 1-> = petite flèche (STO) * = multiplié par
Si vous avez d'autres programmes, des remarques ou des problèmes,
N'hésitez pas à me contacter : webmaster@procaltos.fr.st