fukuri x = floor $ (toDouble x) * 1.01

solve target = loop 100 0
  where
    loop x n
      | target <= fukuri x = (n+1)
      | otherwise = loop (fukuri x) (n+1)


toDouble :: Int -> Double
toDouble x = fromInteger $ toInteger x

main = do
  x <- readLn :: IO Int
  print $ solve x
