module Main where import Control.Monad main :: IO () main = do [n, p] <- fmap read . words <$> getLine :: IO [Int] if p == (n * p) then putStrLn "=" else putStrLn "!="