function isOdd(Number: integer): boolean begin isOdd := boolean(Number and 1) end;