Прототип

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

Описание

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