本帖最后由 a2002 于 2017-7-8 12:08 编辑
这是一个计算2次方根的程序(1到99以内的数),源码如下: | @echo off&setlocal enabledelayedexpansion | | set /p "a=数(1-99):" | | set /p "loop=保留的有效数字:" | | set s=0&set r=&set y=!a! | | :loop | | if "!loop!" equ "!_loop!" goto :ans | | set /a _loop+=1 | | for /l %%a in (1,1,10) do ( | | set /a t1=s*20*%%a+%%a*%%a | | if !t1! gtr !y! ( | | set /a n=%%a-1,_s=s*20*n+n*n,y=y*100-_s*100 | | set r=!r!!n!&set s=!r! | | if !y! equ 0 goto :ans | | goto :loop | | ) | | ) | | :ans | | echo 结果:!r:~0,1!.!r:~1! | | pause>nulCOPY |
大于100、小于1的数原理相同,不再详述 |