hankei r d2 | d2 == 0 = 1 | r2 == d2 = r * 2 + 1 | r2 > d2 = if (r*2 - 1) > d * 2 then r * 2 - 1 else r * 2 | otherwise = hankei (r + 1) d2 where r2 = r ^ 2 d = sqrt d2 main = do str <- getLine let [x,y] = map read $ words str :: [Double] d2 = x^2 + y^2 print $ ceiling $ hankei (max (abs x) (abs y)) d2