Mathematica такая накрученная система, как она такую батву выдает?:
x^3 + q == 0;
Solve[%, x]
{{x -> -q^(1/3)}, {x -> (-1)^(1/3)q^(1/3}, {x -> -(-1)^(2/3)q^(1/3)}}
Хотя Mathcad верно отвечает:
Given
x^3 + q = 0
Find(x) -> [ (-q)^(1/3) _ (-q)^(1/3)*(-1/2 - i*(3)^(1/2)/2) _ (-q)^(1/3)*(-1/2 - i*(3)^(1/2)/2) ]
Maxima аналогично правильно ответила.
