main :: IO ()
main = interact $ solve . map read . words

solve :: [Int] -> String
solve [before, after]
    | before == after = "0"
    | before > after  = "-" ++ (show $ before - after)
    | otherwise       = "+" ++ (show $ after - before)