数据从十位四舍五入?可以吗!谢谢
例 125.28 通过(rtos 125.25 2 0) 可得到 125但怎么让他变成 130 呢即从十位开始四舍五入,小数后面的我知道,但从十位开始可以吗?谢谢
以上数据只是例子, (fix n +)这样也达不到效果的
请指教
找到了,呵!!
zhelindaxues
中级会员
Rank: 3Rank: 3
[未绑定新浪微博]
帖子
117
精华
0
通道币
0 个
明经币
49 个
串个门
加好友
打招呼
发消息
地板
发表于 2009-2-10 13:25:00 |只看该作者
明经CAD知识交易平台 求插件 求程序 求方案 求培训
二楼的解释思路。先进行除10处理 然后再取整 乘10处理。同样也可以进行取5处理大于3取5 小于3取0
(defun c:qu5(x)
(setq y(/ x 5)
x(rem x 5)
)
(if (> 3 x)(setq y (+ 1 y)))
(setq y (fix y))
(setq x (* 5 y))
)
以后要求对某数x进行处理时只要(qu5 x)就行了。
页:
[1]