Преобразование элементарных типов возможно через несколько встроенных функций:

FLOOR(x)  REAL                 INTEGER          округлить до меньшего
FLT(x)    INTEGER              REAL             тождественно
ORD(x)    CHAR, BOOLEAN, SET   INTEGER          порядковый номер x
CHR(x)    INTEGER              CHAR             литера с порядковым номером x

Либо через системный механизм преобразования типов SYSTEM.VAL после импорта модуля SYSTEM

MODULE ExamplesSystemVal;

	IMPORT SYSTEM;

	VAR i: INTEGER; s: SET;

BEGIN

	i := SYSTEM.VAL(INTEGER, s)

END ExamplesSystemVal.