Question: Solving non-linear equations

Hi again.

E1 := x^2-y = 5; E2 := x-y^2 = -13;
                                     2        
                              E1 := x  - y = 5
                                        2      
                             E2 := x - y  = -13
solve({E2, E1}, {x, y});
                    /                                             2      
                   {           /  3       2                      \       
   {x = 3, y = 4},  \y = RootOf\_Z  + 3 _Z  - _Z - 4, label = _L2/  - 5, 

                                                  \ 
               /  3       2                      \ }
     x = RootOf\_Z  + 3 _Z  - _Z - 4, label = _L2// 
fsolve({E2, E1}, {x, y});
                     {x = 1.114907541, y = -3.756981174}
solve({E2, E1}, {x, y}, AllSolutions);
                       /                                               
                      {           /  3       2                      \  
      {x = 3, y = 4},  \x = RootOf\_Z  + 3 _Z  - _Z - 4, label = _L6/, 

                                                     2    \ 
                  /  3       2                      \      }
        y = RootOf\_Z  + 3 _Z  - _Z - 4, label = _L6/  - 5/ 
fsolve({E2, E1}, {x, y}, complex);
                     {x = 1.114907541, y = -3.756981174}
f := x^3+3*x^2-x-4;
                                 3      2        
                           f := x  + 3 x  - x - 4
fsolve(f, x, complex);

                   -2.860805853, -1.254101688, 1.114907541

 

How can I have all the solutions at once?

Thanks in advance

Mario

 

 

 

 

 

Please Wait...