[
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
]