gaoliang286 发表于 2009-2-9 17:59:00

[求助]怎么将小数 约等于整数（lisp）

  例如1.54就 四舍五入 为2<br/>

qjcpj 发表于 2009-2-9 18:02:00

本帖最后由 作者 于 2009-2-9 18:05:59 编辑 <br /><br /> <p>使用rtos函数。</p><p>;;; _$ (setq tt 1.89)<br/>;;; 1.89<br/>;;; _$ (rtos tt 2 0)<br/>;;; "2"<br/>;;; _$ </p>

gaoliang286 发表于 2009-2-9 19:15:00

感谢，小弟初学。。。。<br/> 万分感谢。祝您元宵节快乐。。。<br/>  <br/>

gaoliang286 发表于 2009-2-9 20:34:00

返回的是字符串啊。怎么变成数

qjcpj 发表于 2009-2-9 23:07:00

;;; _$ (distof (rtos 1.54 2 0))<br/>;;; 2.0<br/>;; _$ (fix (distof (rtos 1.54 2 0)))<br/>;;; 2<br/>;; _$

elitefish 发表于 2009-2-11 10:01:00

(fix (+ 1.54 0.5)) ;加0.5 后取整

caoyin 发表于 2009-2-11 10:20:00

(equal 1.54 2 0.5)
页: [1]
查看完整版本: [求助]怎么将小数 约等于整数（lisp）