main :: IO () main = do [a, b] <- map read . words <$> getLine putStrLn $ (if a < b then "YES" else "NO") ++ "\n" ++ show (abs (pred (b - a)))