Trunc（）function

Question

次のコードを見て、Trunc関数の結果が異なるのはなぜですか？

procedure TForm1.Button1Click(Sender: TObject); 
var 
    D: Double; 
    E: Extended; 
    I: Int64; 
begin 
    D := Frac(101/100) * 100; 
    E := Frac(101/100) * 100; 
    I := Trunc(D); 
    ShowMessage('Trunc(Double): ' + IntToStr(I)); // Trunc(Double): 1 
    I := Trunc(E); 
    ShowMessage('Trunc(Extended): ' + IntToStr(I)); // Trunc(Extended): 0 
end; 

Answer 1

フォーマット機能は、常に実際の数字（データ）を表示しません。
実数と精度は難しい場合があります。

は私が画面上に表示する内容に、より精度を使用して、このコードをチェックアウト：

D := Frac(101/100); 
    E := Frac(101/100); 
    ShowMessage(FloatToStrF(D, ffFixed, 15, 20)); 
    ShowMessage(FloatToStrF(E, ffFixed, 18, 20)); 

をEが0.00999999999のようなものである一方、Dが0.010000000000のようなものであることが表示されます。

編集：Extendedタイプの精度がDoubleタイプよりも優れています。 FloatToString（）でDとEの値を表示しようとすると、実際の値が同じではなくであっても、おそらく同じ結果（）が得られます。

Answer 2

注意ニックDの答え。

Dは 0.010000000000のようになりますが、Eは0.00999999999のように見えます。

しかし、答えは書式設定機能ではありません。これは、浮動小数点計算がどのように行われるかです。コンピュータは浮動小数点数を理解できません（コンピュータは有限のビット数とバイト数で動作しますが、0と1の間には無制限の数値があるため）。また、Delphi（および他のほとんどの言語）の各DoubleまたはExtended変数は単なる近似値（実際にはまれな例外がいくつかあります）。

あなたがウィキペディア上での詳細を読むことができます：Floating pointとFixed-point