【mathematica解决填符号使等式成立问题在网上曾经看到过一个高手用列举法解决一个(34口5口6口8口9口1)口2=2008在口中填入加减乘使等式成立程序如下,但是如果题目要求填入加减乘除和括号,程序】

　　mathematica解决填符号使等式成立问题

　　在网上曾经看到过一个高手用列举法解决一个

　　(34口5口6口8口9口1)口2=2008

　　在口中填入加减乘使等式成立

　　程序如下,但是如果题目要求填入加减乘除和括号,程序要怎么改进啊

　　比如(5+5+5)÷5+5=8,即55555=8填入相应符号

　　info=expr[{"+"},{"-"},{"*"}];

　　For[a=1,a