import Data.Char

main = do
  [a, b, c, d] <- map digitToInt <$> getLine
  putStr $ solve a b c d

solve a b c d
  | a + b + c + d == 7
    = s ++ "+" ++ t ++ "+" ++ u ++ "+" ++ v ++ "=7"
  | a + b + c - d == 7
    = s ++ "+" ++ t ++ "+" ++ u ++ "-" ++ v ++ "=7"
  | a + b - c + d == 7
    = s ++ "+" ++ t ++ "-" ++ u ++ "+" ++ v ++ "=7"
  | a + b - c - d == 7
    = s ++ "+" ++ t ++ "-" ++ u ++ "-" ++ v ++ "=7"
  | a - b + c + d == 7
    = s ++ "-" ++ t ++ "+" ++ u ++ "+" ++ v ++ "=7"
  | a - b + c - d == 7
    = s ++ "-" ++ t ++ "+" ++ u ++ "-" ++ v ++ "=7"
  | a - b - c + d == 7
    = s ++ "-" ++ t ++ "-" ++ u ++ "+" ++ v ++ "=7"
  | a - b - c - d == 7
    = s ++ "-" ++ t ++ "-" ++ u ++ "-" ++ v ++ "=7"
  where
    s = show a
    t = show b
    u = show c
    v = show d