WorksheetSeriesSum[Divide[δ,n],n,ConstE,100]Product[δ,SeriesSum[Divide[1,n],n,ConstE,100]]EquationSymbolicSolveRequest[List[Equal[SeriesSum[Divide[δ,n],n,ConstE,100],x]],List[x]]Solution[{x,ExpressionSetPoint[ExpressionWithCondition[Product[δ,SeriesSum[Divide[1,n],n,ConstE,100]],NotEqual[n,0]],False,ReservedReal]}]