main = do l <- getLine let [x, y] = map read $ words l :: [Int] d2 = x*x + y*y d = sqrt $ fromIntegral d2 dia = ceiling (2*d) print $ if fromIntegral dia > 2 * d then dia else dia + 1