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