gets
$t=gets.to_i
s,*$a=gets.split

$memo={}
def dfs i,n
  $memo[[i,n]]||=$a[i]?n<=$t&&[?+,?*].any?{|o|dfs(i+1,eval(n.to_s+o+$a[i]))&&(print o;true)}:n==$t
end

dfs 0,s.to_i
puts