Odd

Declaration:
Function Odd (X : Longint) : Boolean;
Description:
Odd returns True if X is odd, or False otherwise.
Errors:
None.
See also:
Abs (450), Ord (542)

Listing: refex/ex43.pp


Program Example43;

{ Program to demonstrate the Odd function. }

begin
  If Odd(1) Then
    Writeln ('Everything OK with 1 !');
  If Not Odd(2) Then
    Writeln ('Everything OK with 2 !');
end.