{$APPTYPE CONSOLE} var i,n:integer;a,b:longint;f:text; begin assign(f,'Evo.dat');reset(f); readln(f,n,a,b);close(f); assign(f,'Evo.sol');rewrite(f); for i:=1 to n do begin a:=a div 2;b:=b div 2; if a=b then begin write(f,a);close(f);end; end; end.