kill(all);

f(x):=A*x^2+B*x+C;

assume(B^2<4*A*C);

X:solve(f(x),x);

[realpart(rhs(first(X))), imagpart(rhs(first(X)))];

[realpart(rhs(second(X))), imagpart(rhs(second(X)))];