delphi 取整函数

uses math;

//在xe10.2测试正常使用。

1.round(四舍六入五留双)

 var2 i, j: Integer;
 begin
    i := Round(1.5); // i等于2
    j := Round(2.5); // j等于2
 end;

2.RoundClassic(传统四舍五入)

3.trunc（取得X的整数部分）
如：trunc(-123.55)=-123, floor(123.55)=123

4.ceil（取得大于等于X的最小的整数）
如：ceil(-123.55)=-123， ceil(123.15)=124

5.floor（取得小于等于X的最大的整数）
如：floor(-123.55)=-124，floor(123.55)=123