delphi的取整函數round、trunc、ceil和floor
阿新 • • 發佈:2017-05-31
trunc 得到 數值 use 方法 整數 integer 算法 delphi
例:
var
i, j: Integer;
begin
i := Round(1.5); // i等於2
j := Round(2.5); // j等於2
end;
在Delphi中使用Round函數得到的答案有時與我們所預期的會不太一樣:采用的是四舍六入五留雙。即當舍或入位大於或小於五時按四舍五入來處理
,而當舍或入位等於五時,就要看前面一位是什麽,根據奇進偶不進,它總是返回一個偶數值。
例:
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
delphi的取整函數round、trunc、ceil和floor