0 + 0.1 = ? Probleme mit dem Datentyp Single?

[alcaeus]

Hi Nailor,

Zitat von nailor:

Sag mir einen Grund, warum die 0,999999999999999999999999X schlimm ist!

weil 0,9999999 für einen Menschen wohl gleich 1 ist, aber bei diesem Code:

Delphi-Quellcode:

var x: Single;
begin
  x := 0.999999999999999999999999999;
  if x = 1 then
    ShowMessage('Gleich');
end;

trotzdem keine MessageBox angezeigt wird. AFAIK ist der Weg über Ganzzahlaritmetik wohl der einzig mögliche. Dabei dürfte aber auch x := (10*x+1)/10 funktionieren.

Greetz
alcaeus