Прототип

void ENTDECIMAL (
   DECIMAL Id,    /* исходное число */
   DECIMAL Od);   /* целая часть числа */

Описание

Процедура выделяет целую часть вещественного числа с фиксированной точкой, представленного в переменной Id типа DECIMAL, и помещает ее в переменную Od типа DECIMAL.