#!/usr/bin/perl

use strict;
use warnings;

my $n = <>;
my $i;
for($i = 0;  $n >2 ** $i ; $i++) {}
print "$i\n";

exit;