Gerade Zahl oder Ungerade Zahl?

[p80286]

Even() = not(Odd()) ?

Gruß
K-H

[Deep-Sea]

Zitat von p80286:

Even() = not(Odd()) ?

Genau. Oder in Delphi "gesagt":

Delphi-Quellcode:

function Even(X: Integer): Boolean; inline;
begin
  Result := not Odd(X);
end;

[Wolfgang Mix]

Ergänzend zu NamenLoser:

Delphi-Quellcode:

If (x mod 2 = 0) then
  //x ist gerade
else // x ist ungerade

[himitsu]

Wobei aber die AND-Version zu bezuzugen wäre (Odd verwendet diese ebenfalls intern),
da diese kleine Bitoperation wesentlich schöner/flotter ist, als soeine "rießige" mathematische Berechnung, wie das MOD.

Am Ende schlägt noch emand Frac(x / 2) <> 0 .

Wobei man es auch dirkt in einen ASM-Bit-Test casten könnte (über ein SET und den IN-Operator), aber so toll isses dann nun och nicht.

[ConnorMcLeod]

Zitat von himitsu:

Frac(x / 2) <> 0

rotfl u made my day !!
mehr, mehr <bg>

Der Thread erinnert mich an ...
http://www.r-ene.de/lustigetexte/physikpruefung/

[DeddyH]

Nicht, dass das wieder so ein Monster-Thread wird, einer reicht

[implementation]

Zitat von DeddyH:

Nicht, dass das wieder so ein Monster-Thread wird, einer reicht

Nein, jetzt roll' ich mich wieder vor Lachen auf dem Boden, weil du den wieder rausgekramt hast

[alzaimar]

Zitat von himitsu:

Wobei aber die AND-Version zu bezuzugen wäre

Um Gottes Willen, nein! Programme sollen lesbar sein und nicht durch kryptographischen Spezialcode das Insiderwissen des Autors belegen.

Du musst doch sogar einen Kommentar zu dem Code schreiben, damit man weiss, was er machen soll, und das bei 5 Zeichen.

Versteck deine Bittüdelei wenigstens in einer Funktion. Aber nenn die bloß nicht AND_1

[Aphton]

Zitat von alzaimar:

Zitat von himitsu:

Wobei aber die AND-Version zu bezuzugen wäre

Um Gottes Willen, nein! Programme sollen lesbar sein und nicht durch kryptographischen Spezialcode das Insiderwissen des Autors belegen.

Du musst doch sogar einen Kommentar zu dem Code schreiben, damit man weiss, was er machen soll, und das bei 5 Zeichen.

Versteck deine Bittüdelei wenigstens in einer Funktion. Aber nenn die bloß nicht AND_1

Ach quatsch. Ich bin zwar kein professioneller Entwickler, aber ich schätze schon, dass in der Industrie Wert auf perfomanten Code gelegt wird, oder?
Also ich find die Version mit der logischen Verknüpfung einfach am optimalsten und auch sehr leserlich. Man muss ja nur kurz überlegen und schon weiß man, was geschieht.
Außerdem ist es in diesem Fall ja nur ein Einzeiler, daher würde schon die richtige Bennenung der Funktion den Code leserlich machen!

[p80286]

Delphi-Quellcode:

function Ungerade(const ein:integer):boolean;
begin
result:=boolean(ein and 1);
end;

Auf begin end können wir wohl doch nicht verzichten.

Gruß
K-H