main = do [a, b] <- map read . words <$> getLine let x = b - a yn = if x > 0 then "YES" else "NO" m = if x > 0 then x - 1 else abs x + 1 putStrLn yn print m