import Control.Applicative
import Data.Maybe

main :: IO ()
main = do
    [a,b,c,d] <- map (read . pure) <$> getLine :: IO [Int]
    let a0 = if a + b + c + d == 7 then Just (show a++"+"++show b++"+"++show c++"+"++show d) else Nothing
    let a1 = if a + b + c - d == 7 then Just (show a++"+"++show b++"+"++show c++"-"++show d) else Nothing
    let a2 = if a + b - c + d == 7 then Just (show a++"+"++show b++"-"++show c++"+"++show d) else Nothing
    let a3 = if a + b - c - d == 7 then Just (show a++"+"++show b++"-"++show c++"-"++show d) else Nothing
    let a4 = if a - b + c + d == 7 then Just (show a++"-"++show b++"+"++show c++"+"++show d) else Nothing
    let a5 = if a - b + c - d == 7 then Just (show a++"-"++show b++"+"++show c++"-"++show d) else Nothing
    let a6 = if a - b - c + d == 7 then Just (show a++"-"++show b++"-"++show c++"+"++show d) else Nothing
    let a7 = if a - b - c - d == 7 then Just (show a++"-"++show b++"-"++show c++"-"++show d) else Nothing
    putStrLn $ fromJust (a0<|>a1<|>a2<|>a3<|>a4<|>a5<|>a6<|>a7) ++ "=7"