
]Captulo 23 - funes com ordinais

PRED - retorna o predecessor do argumento passado como parmetro. Sua sintaxe: 
  PRED (<varivel>);      
Exemplo:
PROGRAM teste_pred;
TYPE
  semana = (dom,seg,ter,qua,qui,sex,sab);
BEGIN
  WRITELN (o predecessor do nmero 5  ,PRED(5));
  WRITELN (o predecessor da letra A  , PRED());
  IF PRED (seg) = dom
  THEN
    WRITELN (o predecessor de seg  dom);
END.

SUCC - funo que retorna o sucessor do argumento, passado como parmetro.
Sua sintaxe:
  SUCC (<varivel>);
Exemplo:
PROGRAM teste_succ;
TYPE
  semana = (dom,seg,ter,qua,qui,sex,sab);
BEGIN
  WRITELN (o sucessor do nmero 5  , SUCC(5));
  WRITELN (o sucessor da letra A  ,SUCC();
  IF SUCC (seg) = ter
  THEN
    WRITELN (o sucessor de seg ter);
END.
