Ce programme sert à trouver le plus petit commun multiple de deux nombres.
PROGRAM: PPCM
: Clrhome
: Input "PPCM de", Z
: Input "et de ", Y
: Z ®
W
: Y ®
V
: LBL 1
: If W = V
: Then
: Disp W
: Stop
: Esle
: If W >V
: V + Y ®
V
: If W <V
: W + Z ®
W
: Goto 1