main :: IO ()
main = do
  [x, y, z] <- map read . words <$> getLine
  print $ solve x y z

solve :: Int -> Int -> Int -> Int
solve x y z
  | x < y + 2 * z = 0
  | otherwise = 1 + solve (x - y - z) y z