main=do
 x<-map(subtract 48.fromEnum)<$>getLine
 putStrLn$((show$head x)++)$f(head x)(tail x)
f q[]=if q==7 then "=7 " else ""
f q(c:s)=if null pl then if null mi then "" else "-"++(show c)++mi else "+"++(show c)++pl
 where pl=f(q+c)s
       mi=f(q-c)s