main = do
    [m, n] <- map read . words <$> getLine
    print $ m + n / 3