Даны 2 числа. составить программу в результате выполнения которой a и b поменяются местами в паскале АBC
Var a,b:integer; begin read(a,b); b:=b+a; a:=b-a; b:=b-a; write(a,b); end.