Ïðîöåäóðà Inc

 

Procedure Inc(Ch: Char [; N: LongInt] );

Óâåëè÷èâàåò çíà÷åíèå ñèìâîëà Ch íà N. Èñïîëüçóåòñÿ â äâóõ ôîðìàõ:

1. Óñå÷åííàÿ ôîðìà – ïàðàìåòð N îòñóòñòâóåò.  ýòîì ñëó÷àå àðãóìåíò óâåëè÷èâàåòñÿ íà 1.

Ïðèìåð:

C:=‘7’; {c=’7’}

Inc(C); {c=’8’}

Inc(C); {c=’9’}

Inc(C); {c=’:’}

Inc(C); {c=’;’}

2. Ïîëíàÿ ôîðìà – ïàðàìåòð N ïðèñóòñòâóåò.  ýòîì ñëó÷àå àðãóìåíò óâåëè÷èâàåòñÿ íà N.

Ïðèìåð:

C:=‘7’; {c=’7’}

Inc(C, 2); {c=’9’}

Inc(C, 8); {c=’A’}

Inc(C, 5); {c=’F’}