При работе с целыми числами используются процедуры DEC и INC. Процедура Dec уменьшает число на определенное значение, а процедура Inc увеличивает число на определенное значение.

program number9;
uses crt;
var A, D:integer;
begin
clrscr;
A:= -2;
D:=5;
dec (A,D);
writeln(A);
inc (A,D);
writeln(A);
readln
end.

В строке №8 записываем процедуру Dec. Данная процедура уменьшает содержимое переменной «A» на значение переменной «D». Так как переменной «A» присвоено значение «-2», а переменной «D» присвоено значение «5», то результатом данной процедуры будет число «-7» (-2-5=-7).

В строке №10 записываем процедуру Inc. Данная процедура увеличивает содержимое переменной «A» на значение переменной «D». Так как переменной «A» после предыдущей процедуры Dec было присвоено число -7, а переменной «D» присвоено значение «5», то результатом данной процедуры будет число «-2» (-7+5=-2).

Дополнение к материалу.

При использовании процедур Dec и Inc не обязательно записывать переменную «D». Вместо нее можно просто записать число, на которое нужно уменьшить или увеличить переменную «A». Т.е. программу «number9» можно записать таким образом:

program number9;
uses crt;
var A:integer;
begin
clrscr;
A:= -2;
dec (A,5);
writeln(A);
inc (A,5);
writeln(A);
readln
end.

Если при использовании процедуры Dec и Inc не указывать значение, на которое нужно уменьшать или увеличивать значение переменной «A», то по умолчанию это значение будет равно 1.

program number9;
uses crt;
var A:integer;
begin
clrscr;
A:= -2;
dec (A);
writeln(A);
inc (A);
writeln(A);
readln
end.

Строка №7. При записи процедуры Dec мы не указали число, на которое должно быть уменьшено значение переменной «A», поэтому значение переменной «A» уменьшится на 1.

Строка №9. При записи процедуры Inc мы не указали число, на которое должно быть увеличено значение переменной «A», поэтому значение переменной «A» увеличится на 1.