Mail

В этот день много лет назад...
26 ноября. В 1769 году (255 лет назад) - В России учреждается Георгиевский крест.

Turbo Pascal Documentation

Функция Frac

     Функция: Возвращает дробную часть аргумента.
     Описание: Frac(x : real)
     Тип результата: Вещественный (real).
     Примечания: Параметр х является выражением вещественно-
го  типа.  Результатом  является  дробная  часть  x, то есть
Frас(x) = x - Int(x).
     Прочее: См. также функцию Int.
     Пример:

var
   r : real;
   begin
    f := Frac(123.456);
   end.