program zad;
var n,i,b:integer;
   function a(n:integer):integer;
   begin
   if n=1 then a:=1 else a:=a(n div 2)+1;
   end;
Begin
writeln('vvedite n'); readln(n);
   b:=a(n);
writeln(b);
readln;
End.