delphi中有對數值進行四舍五入的函數嗎﹖

Question

delphi中有對數值進行四舍五入的函數嗎﹖如果要對某個數值進行四舍五入該怎么辦﹖

Answer 1

round是四舍五入取整;
而RoundTo是四舍五入;
RoundTo(1.545678, -3)=1.546用法:
RoundTo(x, y)
x为要四舍五入的源数据,y为负数时表示要保留的小数位数,
y为正数时,表示去掉小数,并且把整数部分的后y位数表为0(按照四舍五入的原则)

Answer 2

Round不完全是四舍五入，而是四舍六入，逢五取双。你自己试一下Round(4.5)和Round(5.5)就知道。这样更科学，符合概率论，却不符合中国的习惯。你如果想真正实现四舍五入，可以这样：
Trunc(a + 0.5);