本帖最后由 llsheng_73 于 2022-8-3 08:51 编辑
_$ (setq real 35.2950)
35.295
_$ (rtos real 2 2)
"35.30"
_$ (setq real(- 35.2950 1e-5))
35.295
_$ real
35.295
_$ (rtos real 2 2)
"35.29"
 - (defun myrtos2(real n / a)
- (setvar'dimzin 0)
- (rtos(+ real(/ 0.5(expt 10(1+ n))))2 n))
|