Диалекты Free Pascal и PascalABC поддерживают следующие специальные инструкции присваивания (FreePascal начинает понимать эти инструкции после включения директивы {$COPERATORS ON}):

Операция +=

прибавляет к значению переменной значение выражения стоящего справа от знака операции.

Операция -=

отнимает от значения переменной значение выражения стоящего справа от знака операции.

Операция *=

умножает значение переменной на значение выражения стоящего справа от знака операции.

Операция /=

делит значение переменной на значение выражения стоящего справа от знака операции.

Вот пример использования этих операций:

program let;
var
  i:integer;
begin
  i:=0;
  i+=5; //Увеличение значения переменной i на 5
  i-=2; //Уменьшение значения переменной i на 2
  i*=4; //Умножение значения переменной i на 4
  i/=4; //Деление значения переменной i на 4
end.