ungerade und gerade Zahlen erkennen

[Neutral General]

Deine Gerade/Ungerade Prüfung ist falsch rum. "Odd" bedeuted "Ungerade".

Es wurde zwar schon angedeutet, aber was dein Lehrer wahrscheinlich statt der Funktion Odd() haben wollte ist wahrscheinlich was anderes.
Eine Zahl ist gerade wenn sie ohne Rest durch 2 teilbar ist. In Delphi gibt es den "mod" Operator mit dem du den Rest einer Division erhältst.
D.h. eine andere Art zu prüfen wäre:

Delphi-Quellcode:

if (zahl mod 2) = 0 then // Falls der Rest der Division von der Zahl geteilt durch zwei 0 ist, ist die Zahl gerade
  ShowMessage('Zahl ist gerade')
else
  ShowMessage('Zahl ist ungerade');