Обмен значений 2х переменных без вспомогательной.

Pascal

//Установка значений
a := 5;
b := 10;
//Обмен
a := a+b;
b := a-b;
a := a-b;