5,392
社区成员
发帖
与我相关
我的任务
分享请发表友善的回复…
发表回复
mastersky 2004-10-19
- 打赏
- 举报
RoundTo
dext 2004-10-19
- 打赏
- 举报
SimpleRoundTo
uses Math;
uses Math;
stadong 2004-10-19
- 打赏
- 举报
uses math;
RoundTo();
中国方式的四舍五入
RoundTo();
中国方式的四舍五入
solokey 2004-10-19
- 打赏
- 举报
Trunc(No+0.5);
类似这样的....
类似这样的....
dafeifei 2004-10-19
- 打赏
- 举报
支持 lwk_hlj(阿凯(向双星努力))
xhai 2004-10-19
- 打赏
- 举报
问题已经解决.
多谢楼上各位.
多谢楼上各位.
xhai 2004-10-19
- 打赏
- 举报
roundto不是真正的四舍五入,它应该叫做:四舍六入五求偶.
那位能告诉我一个真实用的吗.我自己也写了一个,但是当末尾数是9时,则有入位时,就计算错误了,且现在客户非常急,所以没有时间再自己写.
那位能告诉我一个真实用的吗.我自己也写了一个,但是当末尾数是9时,则有入位时,就计算错误了,且现在客户非常急,所以没有时间再自己写.
Tensionli 2004-10-19
- 打赏
- 举报
round
h911p 2004-10-19
- 打赏
- 举报
先use MAth;
roundto(小数,-3)小数点后保留三位 如roundto(123.1232,-2)=123.12
roundto( 数,2) roundto(1234,2)=1200;
roundto(小数,-3)小数点后保留三位 如roundto(123.1232,-2)=123.12
roundto( 数,2) roundto(1234,2)=1200;
todouwang 2004-10-18
- 打赏
- 举报
我来看星星的...
飞天揽月 2004-10-18
- 打赏
- 举报
用之前处理一下 判断 ceil(4.5)=5 // floor(2.3)=2
if ceil(t)-t>=0.5 then
t:=ceil(t)
else
t:=floor(t);
if ceil(t)-t>=0.5 then
t:=ceil(t)
else
t:=floor(t);
ly_liuyang 2004-10-18
- 打赏
- 举报
Round不是通常的四舍五入
可以在DelphiBox或CSDN上找到方法的
http://lysoft.7u7.net
可以在DelphiBox或CSDN上找到方法的
http://lysoft.7u7.net
飞天揽月 2004-10-18
- 打赏
- 举报
cell
floor
floor
lwk_hlj 2004-10-18
- 打赏
- 举报
我是这样写的
round(you*100)/100
round(you*100)/100
