EP_CAP P а fеА " Here's a more complicated example.~А # In[2]:= Solve[x^5 + 3x + 1 == 0, x]}А + Out[2]= {ToRules[Roots[3 x + x == -1, x]]}uА B There is no way to get an exact, analytical, solution to a quintic^А A equation like this. You can nevertheless ask Mathematica to give_А @ you numerical results. You get the five complex number roots to`А the equation.УА In[3]:= N[%]ФА G Out[3]= {{x -> -0.839072 - 0.943852 I}, {x -> -0.839072 + 0.943852 I},YА >А . {x -> -0.331989}, {x -> 1.00507 - 0.937259 I},lА >А {x -> 1.00507 + 0.937259 I}}╔А EБO+АN%АO+АN%АO+АNїВOGАN АOGАN АOGАN АOGАN АOGАN АOGАN АOGАNдАO