var i,x,y:longint; c:char; begin i:=0; x:=0; while not EOF do begin inc(i); read(c); if c='x' then inc(x); end; y:=i-x; if x>y then for i:=1 to i-2*y do write('x') else for i:=1 to i-2*x do write('y'); end.