@echo off
:Main
cls
set x=
set n=
set /p x=     请输入被开方的数：
set /p n=     请输入开方次数：
set /a mod=%n%%%2
if %x% equ 1 (
    echo.
    echo      %x% 的 %n% 次方根是 1
    echo.
    pause
    goto Main
)
set /a quotient=x/n
set flag=
for /l %%i in (2,1,%quotient%) do (
    set num=%%i
    for /l %%j in (2,1,%n%) do (
        set /a num=%%i*!num!
    )
    if !num! equ %x% (
        echo.
        if %mod% equ 0 (
            echo      %x% 的 %n% 次方根是 ±%%i
        ) else echo      %x% 的 %n% 次方根是 %%i
        echo.
        set flag=1
        goto end
    )
)
:end
if not defined flag (
    echo.
    echo      %x% 的 %n% 次方根不是整数
    echo.
)
pause
goto Main
复制代码

@echo off&setlocal enabledelayedexpansion
set /p a=请输入要开方的整数：
set "b=2"&set "c=1"
set /p b=请输入要保留的小数位（最好是三位以内，默认回车为两位）：
set /a b*=2
for /l %%a in (1,1,%b%) do set /a c*=10
set /a a*=c,d=a/2+1
for /l %%a in (1,1,%d%) do (
     set /a e=%%a*%%a
     if !e! equ %a% set /a e=%%a&goto next
     if !e! gtr %a% set /a e=%%a-1&goto next
)
:next
set /a b/=2
set "f=!e:~-%b%!"
echo 开出的平方根为±!e:%f%=!.%f%
pause>nul
复制代码