Was kennzeichnet eine gerade Zahl? Das sie ohne Rest durch 2 teilbar ist...
Wie kann somit eine Zahl mit Nachkommastellen jemals gerade sein?
Ich glaube das war anders gemeint, daher habe ich das "danke schön ^^ " vom TE bei der letzten Antwort nicht verstanden.
Eine Prüfung könnte aussehen:
Delphi-Quellcode:
//Prüft ob Kommazahl oder ganze Zahl
if x = trunc(x) then
showmessage('Ganze Zahl')
else
showmessage('Kommazahl');
//Prüft auf gerade Zahl
if odd(x) then
showmessage('ungerade Zahl')
else
showmessage('gerade Zahl');