Модуль: System
Описание Функция возвращает дробную часть аргумента Х, т.е. Frac(X) = X-Int(X).
Пример var x1, x2: Integer; begin ... x1:= Frac(-1234.5678); {x1:=-0.5678} x2:= Frac(1234.5678); {x2:=0.5678} ... end;