program c

implicit none
integer :: I, J
character(4) :: S
character(9) :: ans
integer, dimension(4) :: A
character(1), dimension(4) :: B

read(*,*) S
read(S(1:1),*) A(1)
do I = 2, 4
read(S(I:I),*) A(I)
B(I) = "+"
end do

do I = 1, 2**3
 do J = 1, 3
  A(J+1) = abs(A(J+1))
  B(J+1) = "+"
  if (btest(I-1,J-1)) then
  A(J+1) = - A(J+1)
  B(J+1) = "-"
  end if
 end do
 if (sum(A)==7) exit
end do

do J = 1, 3
A(J+1) = abs(A(J+1))
end do

write(*,'(i0,a1,i0,a1,i0,a1,i0,a1,i0)') A(1),B(2),A(2),B(3),A(3),B(4),A(4),"=",7

end program