Pascal. Меняем две переменных местами.

[zQrd]

Не прав ты, wary.

Сообщение от wary

a:=a xor b;
b:=b xor a; Вроде так.

Ключевое слово здесь вроде.

В две операции обменять значения невозможно. Ты пытался привести здесь такой код:
var
X1, X2: Byte;
begin
X1 := X1 xor X2;
X2 := X1 xor X2; // X2 = X1
X1 := X1 xor X2; // X1 = X2
end.

Это самый быстрый способ обмена. И самый красивый.
Чтоб понять, как это работает, советую посидеть с ручкой и листочком и вручную проверить.