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