欧氏算法求最大公约数

Author: 四川泸州二中陈剑 Date: 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