④程序如下：

INPUT m，n

DO

r=m MOD n

m=n

n=r

LOOP UNTIL r=0

PRINT m

END 或 INPUT m，n

　r=1

While r>0

r=m MOD n

m=n

n=r

 WEND

　PRINT m

END （2）更相减损术

①定义：中国古代的数学专著《九章算术》中记载着"更相减损术"，即"可半者半之，不可半者，副置分母、子之数，以少减多，更相减损，求其等也．以等数约之．"

②算法步骤

第一步，任意给定两个正整数，判断它们是否都是偶数．若是，用2约简；若不是，执行第二步．

第二步，以较大的数减去较小的数，接着把所得的差与较小的数比较，并以大数减小数．继续这个操作，直到所得的数相等为止，则这个数(等数)或这个数与约简的数的乘积就是所求的最大公约数．

③程序框图

④程序如下：