   program abc165b
      implicit none
      integer(8)::X,x0
      integer::i

         read *, X

         i=0
         x0=100
         do
            i=i+1
            x0=x0*1.01
            if (x0>=X) exit
         end do

         print *, i

   end program abc165b