RosettaCodeData/Task/Even-or-odd/Pascal/even-or-odd-2.pascal

5 lines
85 B
Text
Raw Permalink Normal View History

2013-04-10 22:43:41 -07:00
function isOdd(Number: integer): boolean
begin
isOdd := boolean(Number and 1)
end;