Прототип

void NEGDECIMAL (
  DECIMAL Id,    /* исходное число */
  DECIMAL Od);   /* преобразованное число */

Описание

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