Cómo transformar un real a un entero

Para convertir un real a un entero es necesario usar alguna de las funciones siguientes:

funcción Trunc(X:Extended):Integer;
Trunc ajusta al entero más pequeño. Ejemplos:
Trunc(1.2) devuelve 1
Trunc(1.9) devuelve 1
Trunc(-1.4) devuelve -1

función Round(X:Extended):Integer;
Round redondea al entero más próximo. En el caso que el valor esté justo en medio de dos enteros, devolverá el entero par. Ejemplos:
Round(1.2) devuelve 1
Round(1.9) devuelve 2
Round(1.5) devuelve 2
Round(2.5) devuelve 2
Round(2.500001) devuelve 3
Round(-1.4) devuelve -1
Round(-1.5) devuelve -2

función Ceil(X:Extended):Integer; ( unit Maths )
Ceil redondea al entero superior. Ejemplos:
Ceil(1.2) devuelve 2
Ceil(1.9) devuelve 2
Ceil(-1.5) devuelve -1

función Floor(X:Extended):Integer; ( unit Maths )
Floor redondea al entero inferior
Floor(1.2) devuelve 1
Floor(1.9) devuelve 1
Floor(-1.5) devuelve -2