Round 四捨五入

Delphiでは Round 関数を使用します。ただしこの関数は四捨五入ではなく値を丸めます。Round関数が採用している方法は ”Banker's Rounding” と呼ばれる規則です。これは一の位が偶数になるように丸める規則（例： 0.5 は 0，1.5 は 2 になる）で，財務/統計関数で使われている規則です。
通常の四捨五入をする場合はやはり自作の関数が必要です。

    ■ 四捨五入の例

    
function Roundoff(X: Extended): Longint;  
begin
  if x >= 0 then begin
     Result := Trunc(x + 0.5);
  end else begin
     Result := Trunc(x - 0.5);
  end;
end;

関連項目
Int 切り捨て