Вводятся х,у целого типа написать программу для обмена значений величин. необходимо использовать величину т

Begin
var a:integer:=readlninteger('Введите х');
var b:integer:=readlninteger('Введите у');
var t:=1;
t:=a;
a:=b;
b:=t;
end.