5 lines
97 B
Text
5 lines
97 B
Text
|
function isEven(Number: integer): boolean
|
||
|
|
begin
|
||
|
|
isEven := (Number = ((Number div 2) * 2))
|
||
|
|
end;
|