x1= 0Do x0 = X1 f1 = x0 ^ 5 - 3 * x0 ^ 2 + 2 * x0 + 1 f2 = 5 * x0 ^ 4 - 6 * x0 + 2 X1 = x0 - f1 / f2Loop While Abs(X1 - x0) > 0.000001Print X1