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