50g求两数最大公约数的程序

aswed

<< WHILE DUP REPEAT SWAP OVER MOD END DROP >>
输入后保存一个名字

RPN模式输入两个数。然后点这个程序名字。
ALG模式输入这个程序然后括号两个数，然后enter。

dousha99

已经有一个 GCD 操作符了~

在启用 soft menu (Flag 117 = 1) 时：
ARITH[Lshift + 1] - POLY[F2] - [NXT] - GCD[F3]

aswed

dousha99 发表于 2018-9-19 13:57
已经有一个 GCD 操作符了~

在启用 soft menu (Flag 117 = 1) 时：

这是外国人写的用中国古法求最大公约数程序。两数互相取余最后剩下的就是公约数。介绍的是这种方法。