Поменять местами значения х и у не используя дополнительную переменную.(pascal)

Question

Информатика: Поменять местами значения х и у не используя дополнительную переменную.(pascal)

pety1234 · Answer

Var x,y:integer; Begin   x:=20;   y:=40;   x:=x+y;   y:=x-y;   x:=x-y;   Write (x,   ,y); End....