DELPHI中取整数的方法

DELPHI中取整数的⽅法
DELPHI中取整数的⽅法
1.Round（四舍六⼊五留双）
功能说明：对⼀个实数进⾏四舍五⼊。

(按照银⾏家算法)
例：
var
i, j: Integer;
begin
i := Round(1.5); // i等于2
j := Round(2.5); // j等于2
end;
在Delphi中使⽤Round函数得到的答案有时与我们所预期的会不太⼀样：采⽤的是四舍六⼊五留双。

即当舍或⼊位⼤于或⼩于五时按四舍五⼊来处理
，⽽当舍或⼊位等于五时，就要看前⾯⼀位是什么，根据奇进偶不进，它总是返回⼀个偶数值。

DELPHI中取整数的⽅法（转）
例：
i:= Round(11.5)//i等于12
i:= Round(10.5)//i等于10
这种Round其实是按照银⾏家算法，统计学上⼀般都⽤这种算法，⽐传统的"四舍五⼊"要科学。

如果要使⽤传统的"四舍五⼊"⽅法，可以使⽤下⾯函数：
function RoundClassic(R: Real)
2.trunc（取得X的整数部分）
如：trunc(-123.55)=-123, floor(123.55)=123
3.ceil（取得⼤于等于X的最⼩的整数）
如：ceil(-123.55)=-123， ceil(123.15)=124
4.floor（取得⼩于等于X的最⼤的整数）
如：floor(-123.55)=-124，floor(123.55)=123
注：floor和ceil是math unit⾥的函数，使⽤前要先Uses Math。