Модуль: Math

Описание
Функция округляет значение аргумента X к ближайшему меньшему целому. Абсолютное значение X не должно превышать величину MaxInt ( 2 147 483 647 ).

Пример
var
  x1, x2: Integer;
begin
...
  x1:= Floor(-5.7);     {x1:=-6}
  x2:= Floor(5.7);      {x2:= 5}
...
end;