do while m<>n ,23,28进行入循环
do while m>n:m=m-n:loop 23>18,m=23-18=5
do while m
do while m<>n ,5,3进行入循环
do while m>n:m=m-n:loop 5>3,m=5-3=2
do while m
do while m<>n ,2,1进行入循环
do while m>n:m=m-n:loop 2>1,m=2-1=1
do while m
do while m<>n ,1,1不进行入循环
do while m>n:m=m-n:loop 2>1,m=2-1=1
do while m
mybm=m ,mybm=1
这是求最大公约数的程序,只是程序的效率比较低。
因为23与18互质,所以最大公约数为1.