main :: IO ()
main = do
    [a, b] <- fmap read . words <$> getLine :: IO [Int]
    let (d, m) = divMod b a
    putStrLn $ if m == 0 then show d else "NO"