Procedure Dec(Ch: Char [; N: LongInt] );
Работает аналогично Inc, только в сторону уменьшения - уменьшает значение символа Ch на N. Используется в двух формах:
1. Усеченная форма – параметр N отсутствует. В этом случае аргумент уменьшается на 1.
Пример:
C:=‘2’; {c=’2’}
Dec(C); {c=’1’}
Dec(C); {c=’0’}
Dec(C); {c=’/’}
Dec(C); {c=’.’}
2. Полная форма – параметр N присутствует. В этом случае аргумент уменьшается на N.
Пример:
C:=‘7’; {c=’7’}
Dec(C, 7); {c=’0’}
Dec(C, 5); {c=’+’}
Dec(C, 5); {c=’&’}