Chapter 20: Calculations

Mathematica has a built-in function Solve for solving equations (algebraic or otherwise). It manages to avoid some of the foibles of Cardano's formulas.

Solve[x^3  -  3  x  +  5  ==  0,  x]

Solve[x^4  -  3  x  +  3  == 0,  x]