欧氏算法求最大公约数

四川泸州二中 陈剑
1992-06-05

        10 INPUT "M,N=";M,N
        20 P=INT(M/N)：R=M-N*P:IF R=0 THEN PRINT "N=";N:END
        30 M=N:N=R:GOTO 20
 
 