[数值计算] 批处理计算两个数的最大公约数（欧几里得算法）

小竹

@echo off 
set/p a=请输入正整数a
set/p b=请输入正整数b
if %a% lss %b% set temp=%a%,a=%b%,b=%temp%
:start
set /a r=%a%%%%b%
if {%r%}=={0}   goto end
set a=%b%
set b=%r%
goto start
:end
echo a和b的最大公因子是%b%
pause
复制代码