Vergleich von Zahlen

[Amateurprofi]

So?

Delphi-Quellcode:

type
   TValues=Array of Double;
FUNCTION CheckRegularity(Values:TValues):Boolean;
var I:Integer; Delta:Double;
begin
   Result:=True;
   if Length(Values)>2 then begin
      Delta:=Values[1]-Values[0];
      for I:=1 to Length(Values)-2 do
         if not SameValue(Values[I+1]-Values[I],Delta) then begin
            Result:=False;
            Exit;
         end;
   end;
end;

Nur nebenbei:
In #1 schreibst du

Zitat:

Diese Daten sind in dem Format "0.000000" also mit 6 Nachkommastellen und einem Dezimalpunkt anstelle des Komma. Die Anzahl der Positionen und deren Wert ist prinzipiell frei. Können theoretisch auch Nachkommastellen enthalten

Was denn nun?
Haben die Daten 6 Nachkommastellen oder können sie auch Nachkommastellen enthalten.