四舍五入

wjm3 · 发表于 2004-3-30 00:24

您好!

请问有什么方法能达到对一个数值四舍五入的效果.例如:3.6548===>3.7

Student · 发表于 2004-3-30 08:03

(setq dn 10.0);注意，是10.0, 不是10
(/ (fix(+(* 3.6548 dn) 0.5)) dn)

龙龙仔 · 发表于 2004-3-30 12:23

Student寫個通用函數好嗎?

yxp · 发表于 2004-3-30 21:51

:3.6548===>3.7

这还用写函数吗?

(setq aaa 3.6548 bbb (rtos aaa 2 1))

无痕 · 发表于 2004-3-30 22:20

转换为实数呢？

yxp · 发表于 2004-3-30 22:29

用read大概可以吧.

meflying · 发表于 2004-3-30 22:38

最好用atof

无痕 · 发表于 2004-3-30 22:39

超过6个数字会不会丢信息呢？。。。。：）试试

wjm3 · 发表于 2004-3-30 22:39

谢谢各位指点,我原来不知道rtos能配合做到四舍五入的效果.

(setq aaa 3.6548 bbb (atof (rtos aaa 2 1)))即可转为实数

yxp · 发表于 2004-3-30 22:40

9494

账号		自动登录	找回密码
密码			注册