Delphi里有4舍5 入的函数吗?(10分)

A

andeuy

Unregistered / Unconfirmed
GUEST, unregistred user!
大家好!

有哪位朋友有能用于Delphi的四舍五入函数吗?请给我一个。
谢谢!
 
Round 四舍五入
Trunc 取整
 
round(i,j)
 
Round好象返回的是64位的整数。
 
我习惯用str函数
var
s:string

begin
str(value:0:2,s);
// 2表示保留2位小数,此时将value值四舍五入保留到小数点后两位作为字符赋值给s;再转化一下就可以了;
end


主要是保留几位小数都很方便,个人比较喜欢
 
trunc就可以用了,这是一个基本的编程技巧问题,我想不用我教你吧.

然后,请参阅delphi的手册或者帮助,round不是四舍五入函数,round的结果
是向偶数靠齐的,delphi的帮助说的很清楚,如果要实现四舍五入,必须使用
trunc函数.
 
建議自己編寫一段小程序實現吧.
這樣好一點
 
多人接受答案了。
 
顶部