(a)

(b)

a_4: 1
a_2: -2
f1(x) = x^(4) - (2 * x^(2))
a_3 = -1 (slider from -2 to 2, step 1)
a_1 = -1 (slider from -2 to 2, step 1)
f2(x) = x^(3) - (2 * x)
a_0 = 2 (slider from -2 to 2, step 1)
a4text = If(a_4 ≥ 0, LaTeX[a_4], "(" + (LaTeX[a_4]) + ")")
a3text = If(a_3 ≥ 0, LaTeX[a_3], "(" + (LaTeX[a_3]) + ")")
a2text = If(a_2 ≥ 0, LaTeX[a_2], "(" + (LaTeX[a_2]) + ")")
a1text = If(a_1 ≥ 0, LaTeX[a_1], "(" + (LaTeX[a_1]) + ")")
a0text = If(a_0 ≥ 0, LaTeX[a_0], "(" + (LaTeX[a_0]) + ")")
Text1: "f(x) = " + (LaTeX[a4text]) + " \cdot x^4 + " + (LaTeX[a3text]) + " \cdot x^3 + " + (LaTeX[a2text]) + " \cdot x^2 + " + (LaTeX[a1text]) + " \cdot x + " + (LaTeX[a0text]) + ""
a = true
b = false
f(x) = (a_4 * x^(4)) + (a_3 * x^(3)) + (a_2 * x^(2)) + (a_1 * x) + a_0
l1 = Sequence((i, f1(i)), i, -2, 2)
l2 = Sequence((i, f2(i)), i, -2, 2)