Protótipo: function succ(x: qualquerTipoOrdinal): mesmoTipo;
Descrição: Retorna o elemento que sucede x.
Exemplo:
program exemploSucc; begin writeln(pred(3)); // Deve imprimir 4 end.