program ideone;
var
x,y,v:integer;
begin
write('Введите x,y: ');
readln(x,y);
v := x;
x := y;
y := v;
writeln('Новые значения x,y: ',x,' ',y);
end.
cHJvZ3JhbSBpZGVvbmU7CnZhciAKICB4LHksdjppbnRlZ2VyOwpiZWdpbgogIHdyaXRlKCfQktCy0LXQtNC40YLQtSB4LHk6ICcpOwogIHJlYWRsbih4LHkpOwogIHYgOj0geDsKICB4IDo9IHk7CiAgeSA6PSB2OwogIHdyaXRlbG4oJ9Cd0L7QstGL0LUg0LfQvdCw0YfQtdC90LjRjyB4LHk6ICcseCwnICcseSk7CmVuZC4=