Задача:Даны переменные А и В.Требуется обменять их значениями,т.е. переменная А должна получить значение В,а В-значение А

var a,b,c,d:integer;begin writeln('Введите а');readln(a);writeln('Введите b');readln(b);c:=a;d:=b;a:=d;b:=c;writeln('a:=',a);writeln('b:=',b);end.