Pascal/Turbo Pascal - Obtener la parte entera de un numero

Como obtengo, en pascal, la parte entera de un numero decimal

Bueno. No sé si hay una función ya hecha, pero se me ocurre algo así:

var Ent:integer;
Flt:real;

begin
Ent:=flt div 1;
end;

La idea es dividir el número con coma por uno (usando división entera), el resultado va a ser un número entero. Lo que no sé es si "div" puede recibir números flotantes... pero bueno.

Espero te sirva. Saludos y felices compiladas.