imports System

Module Module1
  public Sub Main()

    Dim Money as long = Long.Parse(Console.ReadLine())

    Dim Result as long = 100

    for i as long = 1 to 100000000000000000

        Result =  Math.Truncate(Result * 1.01)

	if Money <= Result then 

		console.writeLine(i.tostring)
		exit for
	
	end if

    next

  End Sub
End Module
