Hallo,
Ich brauch in meinem Programm eine Funktion die mir sagt ob die zu überprüfende Zahl (zwischen 1 und 16) gerade oder nicht ist. Also hab ich das so gelöst:
Delphi-Quellcode:
function Gerade(Zahl: Integer) : Boolean;
begin
Result := true;
if Zahl mod 2 = 5 then Result := false;
end;
Doch leider gab er mir hier immer True zurück. Jedoch funktionier folgender Code:
Delphi-Quellcode:
function Gerade(Zahl: Integer) : Boolean;
begin
Result := true;
if Zahl mod 2 <> 0 then Result := false;
end;
Woran liegt das?
Ich dachte immer eine Ganze ungerade Zahl durch zwei ergibt x,5 und da mod ja das hinter dem Komma nur gibt müsst doch die obere Funktion auch funktionier, oder hab ich in der Schule nicht aufgepasst?
//Edit: Stanlay Hanks und der Asche Vogel haben mir es gerade freundlicherweise im Chat erklärt
Danke!
MFG
Maximus