for 加 set /a 能否实现开方
@set c= 不知则觉多,知则觉少,越知越多,便觉越来越少. --- 知多少.
@for,/l,%%i,in,(1,1,55)do,@call,set/p=%%c:~%%i,1%%<nul&ping/n 1 127.1>nul
@for,/l,%%i,in,(1,1,55)do,@call,set/p=%%c:~%%i,1%%<nul&ping/n 1 127.1>nul
中国DOS联盟
联盟域名：www.cn-dos.net 论坛域名：www.cn-dos.net/forum
DOS，代表着自由开放与发展，我们努力起来，学习FreeDOS和Linux的自由开放与GNU精神，共同创造和发展美好的自由与GNU GPL世界吧！
中国DOS联盟论坛 » DOS批处理 & 脚本技术（批处理室） » for 加 set /a 能否实现开方
楼 主
for 加 set /a 能否实现开方
发表于 2007-03-15 09:22 · 中国 湖北 黄冈 电信
第 2 楼
发表于 2007-03-16 01:32 · 中国 甘肃 张掖 电信
我一直没有思路
第 3 楼
发表于 2007-03-16 02:30 · 中国 广东 电信
可以实现简单的开方，但是效率不怎么样，并且只限于存在整数次方根的情况，当然，超过2^31-1的数字就不行了。基本思路就是：如果对x开n次方，则从2开始到x/n的整数止，对每个数进行测试，只到找到为止，代码如下：
[ Last edited by namejm on 2007-3-16 at 01:02 PM ]
@echo off
setlocal enabledelayedexpansion
: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
[ Last edited by namejm on 2007-3-16 at 01:02 PM ]
尺有所短，寸有所长，学好CMD没商量。
考虑问题复杂化，解决问题简洁化。
考虑问题复杂化，解决问题简洁化。
第 4 楼
发表于 2007-03-21 03:15 · 中国 湖北 黄冈 电信
还不错, 不过当被开方数为负数会提示错误, 如 -27 3
@set c= 不知则觉多,知则觉少,越知越多,便觉越来越少. --- 知多少.
@for,/l,%%i,in,(1,1,55)do,@call,set/p=%%c:~%%i,1%%<nul&ping/n 1 127.1>nul
@for,/l,%%i,in,(1,1,55)do,@call,set/p=%%c:~%%i,1%%<nul&ping/n 1 127.1>nul
第 5 楼
发表于 2008-07-31 21:55 · 中国 江西 吉安 电信
回去翻一下微积分的书，重点看麦克劳林级数，再利用for循环和set/a 运算
第 6 楼
发表于 2008-07-31 21:59 · 中国 广东 广州 电信
第 7 楼
发表于 2008-07-31 23:45 · 中国 山东 淄博 联通
变化的只是头脑，来个简单的。
10000以内。。。
[ Last edited by pusofalse on 2008-7-31 at 11:46 PM ]
@echo off&setlocal enabledelayedexpansion
for /l %%a in (1 1 100) do (
set/a n=%%a*%%a
set ..!n!=%%a * %%a = !n!
)
set/p var=Input:
if defined ..%var% echo !..%var%!
pause>nul10000以内。。。
[ Last edited by pusofalse on 2008-7-31 at 11:46 PM ]
心绪平和,眼藏静谧,无比安稳的火... Purification of soul...Just a false...^_^
论坛跳转: