main :: IO ()
main = do
  [x, y] <- map (read :: String -> Double) . words <$> getLine
  print . ceiling . (+ 1e-6) . (*2) . sqrt $ x * x + y * y