import Data.List.Split
main = do
  s <- getLine
  putStrLn $ aux s

aux :: String -> String
aux str
  | a < b = "a < b"
  | a==b  = "a == b"
  | True  = "a > b"
  where
    [a,b] = map (\x -> read x :: Int)  (splitOn " " str)