fpprintprec:4$

Realpart(foo):=float(rhs(realpart(foo)))$
Imagpart(foo):=float(rhs(imagpart(foo)))$
Float(foo) :=Realpart(foo) + Imagpart(foo)*%i$

van=facebook.com/LearningCalculus$

f(x):=''(factor(x^6+2*x^5-4*x^2-12*x^3-7*x^2+10*x+10));

[f(-1), f(1)];

last_cubic:fullratsimp(solve(x^3+x^2-10,x))$

for i:1 thru 3 do (print(last_cubic[i]), print(Float(last_cubic[i])))$