procedure TForm1.Button1Click(Sender: TObject); var R1 : Single; begin R1 := 0.1; if R1 = 0.1 then begin MessageBox(Handle, '同じ値です', '結果', MB_ICONINFORMATION); end else begin MessageBox(Handle, '同じ値ではありません', '結果', MB_ICONWARNING); end; end; というものです.例をあげたらきりがありません.対象の数値や結果は,数値の型や,どんな計算をしたか,結果をどのように取得したかにもよります. コンピュータは昔「電算機」とか「電子計算機」と呼ばれていました.科学技術計算でコンピュータを使用する者にとって,上記のような現象は,必要不可欠な知識であり,常識といっても過言では