中国DOS联盟论坛

中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --

联盟域名:www.cn-dos.net  论坛域名:www.cn-dos.net/forum
DOS,代表着自由开放与发展,我们努力起来,学习FreeDOS和Linux的自由开放与GNU精神,共同创造和发展美好的自由与GNU GPL世界吧!

游客:  注册 | 登录 | 命令行 | 会员 | 搜索 | 上传 | 帮助 »
中国DOS联盟论坛 » DOS批处理 & 脚本技术(批处理室) » [求助]命令行下通过四则运算得到绝对值
« [1] [2] »
作者:
标题: [求助]命令行下通过四则运算得到绝对值 上一主题 | 下一主题
everest79
金牌会员

一叶枝头,万树皆春



积分 2564
发帖 1127
注册 2006-12-25
状态 离线
『楼 主』:  [求助]命令行下通过四则运算得到绝对值

大概如下

set /p a=input
set /a b=算法
%b%为输入数字的绝对值

不使用字符替换或IF判断

2007-1-17 12:58
查看资料  发短消息 网志   编辑帖子  回复  引用回复
namejm
荣誉版主

batch fan


积分 5226
发帖 1737
注册 2006-3-10
来自 成都
状态 离线
『第 2 楼』:  

  最简单的办法是用字符串替换语句,演示代码如下:
@echo off
set input=
set /p input=请输入实数:
echo %input:-=%
pause
——————————————————
  居然是不要字符替换的,还不允许用if语句,真是太BT了,不知道你这样要求有什么特殊需要。再来一个:
@echo off
set input=
set /p input=请输入实数:
for /f "tokens=* delims=-" %%i in ("%input%") do echo %%i
pause
[ Last edited by namejm on 2007-1-17 at 12:33 AM ]



尺有所短,寸有所长,学好CMD没商量。
考虑问题复杂化,解决问题简洁化。
2007-1-17 13:27
查看资料  发短消息 网志   编辑帖子  回复  引用回复
everest79
金牌会员

一叶枝头,万树皆春



积分 2564
发帖 1127
注册 2006-12-25
状态 离线
『第 3 楼』:  

嘿嘿,版主你作弊,我要通过计算来得到绝对值,想了一下午了

2007-1-17 13:42
查看资料  发短消息 网志   编辑帖子  回复  引用回复
redtek
金牌会员





积分 2902
发帖 1147
注册 2006-9-21
状态 离线
『第 4 楼』:  

第1种方法: 负负得正原理
@echo off

set /p var=请输入负数:
set /a var=-%var%

echo 绝对值为: %var%
计算有小数点儿的数字出错~:)
计算正数出错:)



第2种方法: (负数)-(负数)*2 =(绝对值)
@echo on

set /p var=请输入负数:
set /a var=%var%-%var%*2

echo 绝对值为: %var%
不支持浮点运算。
只支持求负数的绝对值(输入正数则出错)



    Redtek,一个永远在网上流浪的人……

_.,-*~'`^`'~*-,.__.,-*~'`^`'~*-,._,_.,-*~'`^`'~*-,._,_.,-*~'`^`'~*-,._
2007-1-17 22:23
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
scriptor
银牌会员




积分 1187
发帖 555
注册 2006-12-21
状态 离线
『第 5 楼』:  

I got one:

@echo off
set /p n="Input any negative number: "
set /a m=~n+1
echo The absolute of %n% is: %m%
pause >nul

It's too easy by using it.

No decimal fraction, but zero is permitted.

[ Last edited by scriptor on 2007-1-17 at 11:16 AM ]

2007-1-17 23:30
查看资料  发短消息 网志   编辑帖子  回复  引用回复
qzwqzw
银牌会员

天的白色影子


积分 2342
发帖 635
注册 2004-3-6
状态 离线
『第 6 楼』:  

一个粗劣的例子

a取值的上下限各缩小一半

set /a b=(a*2+1)%%2*a

   此帖被 +22 点积分     点击查看详情   
评分人:【 everest79 分数: +4  时间:2007-1-18 01:12
评分人:【 redtek 分数: +9  时间:2007-1-18 02:39
评分人:【 namejm 分数: +4  时间:2007-1-18 10:23
评分人:【 lxmxn 分数: +4  时间:2007-1-18 11:10
评分人:【 minmin888 分数: +1  时间:2007-5-4 10:58


2007-1-17 23:37
查看资料  发短消息 网志   编辑帖子  回复  引用回复
scriptor
银牌会员




积分 1187
发帖 555
注册 2006-12-21
状态 离线
『第 7 楼』:  

请把它删除了
写错了

[ Last edited by scriptor on 2007-1-17 at 11:14 AM ]

2007-1-17 23:47
查看资料  发短消息 网志   编辑帖子  回复  引用回复
scriptor
银牌会员




积分 1187
发帖 555
注册 2006-12-21
状态 离线
『第 8 楼』:  

请版主把它删除了

[ Last edited by scriptor on 2007-1-17 at 11:12 AM ]

2007-1-17 23:51
查看资料  发短消息 网志   编辑帖子  回复  引用回复
qzwqzw
银牌会员

天的白色影子


积分 2342
发帖 635
注册 2004-3-6
状态 离线
『第 9 楼』:  

scriptor兄

给你两个建议

1、多用中文

2、多做测试

2007-1-17 23:59
查看资料  发短消息 网志   编辑帖子  回复  引用回复
scriptor
银牌会员




积分 1187
发帖 555
注册 2006-12-21
状态 离线
『第 10 楼』:  



  Quote:
Originally posted by qzwqzw at 2007-1-17 10:59:
scriptor兄

给你两个建议

1、多用中文

2、多做测试

你是说8楼的代码吗?
对不起,搞错了,那个只能计算奇数

谢谢你了

我一时性急就发过来了

2007-1-18 00:09
查看资料  发短消息 网志   编辑帖子  回复  引用回复
qzwqzw
银牌会员

天的白色影子


积分 2342
发帖 635
注册 2004-3-6
状态 离线
『第 11 楼』:  不尽如此

对于#4中的 ~n+1 代码,不知你是否拿正整数做过测试?

另外保持版面的简洁是我们共同的义务

2007-1-18 00:15
查看资料  发短消息 网志   编辑帖子  回复  引用回复
scriptor
银牌会员




积分 1187
发帖 555
注册 2006-12-21
状态 离线
『第 12 楼』:  

我在那里已经说明了:
@echo off
set /p n="Input any negative number: "
是输入负数。

谢谢。记住了
我发现这几天来我犯了很多的错误啊。
真的不好意思再发帖子了

2007-1-18 00:19
查看资料  发短消息 网志   编辑帖子  回复  引用回复
everest79
金牌会员

一叶枝头,万树皆春



积分 2564
发帖 1127
注册 2006-12-25
状态 离线
『第 13 楼』:  



  Quote:
Originally posted by qzwqzw at 2007-1-17 10:37 AM:
一个粗劣的例子

a取值的上下限各缩小一半

set /a b=(a*2+1)%%2*a

谢谢qzwqzw,看来我把问题复杂化了

2007-1-18 01:13
查看资料  发短消息 网志   编辑帖子  回复  引用回复
namejm
荣誉版主

batch fan


积分 5226
发帖 1737
注册 2006-3-10
来自 成都
状态 离线
『第 14 楼』:  

  qzwqzw 的思路不错,PF。



尺有所短,寸有所长,学好CMD没商量。
考虑问题复杂化,解决问题简洁化。
2007-1-18 10:26
查看资料  发短消息 网志   编辑帖子  回复  引用回复
tghksj
社区乞丐

此图片另存后死机



积分 -49
发帖 90
注册 2006-12-2
状态 离线
『第 15 楼』:  

轻轻的问一下:

qzwqzw老师

可不可以利用SET的2进制赋值符号进行转换呢??

[ Last edited by tghksj on 2007-1-17 at 10:50 PM ]



我的网络笔记本.[color=Red]非联系本人请勿访问![/color]http://w.vicp.net[img]http://zhenlove.com.cn/cndos/fileup/files/QM2.jpg[/img]
2007-1-18 11:38
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
« [1] [2] »
请注意:您目前尚未注册或登录,请您注册登录以使用论坛的各项功能,例如发表和回复帖子等。


可打印版本 | 推荐给朋友 | 订阅主题 | 收藏主题



论坛跳转: