Язык:
Русский
English
{Inc.PAS}
{ Пример программы для процедуры Inc }
var
IntVar : Integer;
LongIntVar : LongInt;
begin
Inc(IntVar); { IntVar := IntVar + 1 }
Inc(LongIntVar, 5); { LongIntVar := LongIntVar + 5 }
end.
IntVar : Integer;
LongIntVar : LongInt;
begin
Inc(IntVar); { IntVar := IntVar + 1 }
Inc(LongIntVar, 5); { LongIntVar := LongIntVar + 5 }
end.