{ tde }
{ Smart solution with O(logN) }
{$APPTYPE CONSOLE}
{$B-,R-,O+}
var
 fi,fo:text;
 n,ans:longint;
begin
 assign(fi,'garland.dat');
 assign(fo,'garland.sol');
 reset(fi);
 rewrite(fo);
 readln(fi,n);
 ans:=1;
 while(n>0)do
  begin
   ans:=2*ans;
   n:=n and (n-1);
  end;
 ans:=ans div 2;
 writeln(fo,ans);
 close(fi);
 close(fo);
end.