[next] [prev] [prev-tail] [tail] [up]

#### Ord

Declaration:
  Function Ord (X : Any ordinal type) : Longint;
Description:
  Ord returns the Ordinal value of a ordinal-type variable X.
Errors:
  None.
See also:
  Chr (464), Succ (583), Pred (548), High (511), Low (531)

Listing: refex/ex45.pp

Program Example45;
{ Program to demonstrate the Ord,Pred,Succ functions. }
Type
TEnum = (Zero, One, Two, Three, Four);
Var
X : Longint;
Y : TEnum;
begin
X:=125;
Writeln (Ord(X)); { Prints 125 }
X:=Pred(X);
Writeln (Ord(X)); { prints 124 }
Y:= One;
Writeln (Ord(y)); { Prints 1 }
Y:=Succ(Y);
Writeln (Ord(Y)); { Prints 2}
end.

[next] [prev] [prev-tail] [front] [up]