1. 程式人生 > >delphi的取整函數round、trunc、ceil和floor

delphi的取整函數round、trunc、ceil和floor

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