local mfl, mce = math.floor, math.ceil local n = io.read("*n") local r = io.read("*n") local a = {} for i = 1, n do a[i] = io.read("*n") end local t = {} for i = 1, n do t[i] = {} for j = 1, r do t[i][j] = false end end t[n][r] = true for i = n, 2, -1 do for j = a[i] + 1, r do if t[i][j] then t[i - 1][j - a[i]] = true end end local lim = mfl(r / a[i]) for j = 1, lim do if t[i][j * a[i]] then t[i - 1][j] = true end end end local cur = a[1] for i = 1, n - 1 do if t[i + 1][cur + a[i + 1]] then io.write("+") cur = cur + a[i + 1] else io.write("*") cur = cur * a[i + 1] end end io.write("\n")