f(x)=

c=

a=

f(x) = x^(3) + 2 * x^(2) + x / 2 - 1
f' = Derivative(f)
a = 0 (slider from -5 to 5, step 0.1)
tanlin(x) = f(a) + f'(a) * (x - a)
f'' = Derivative(f')
c = 4
c_1(x) = 6 * x
inputBox2 = Textfield(f)
inputBox3 = Textfield(c)
quadpoly(x) = f(a) + f'(a) * (x - a) + c * (x - a)^(2)
fpa: f'(a)
f2pa: f''(a)
fa: f(a)
fminusatext = Simplify("x-" + a)
plusctext = Simplify("+" + c)
A = Point(f)
Qtext = Simplify(If[a ≟ 0, fa + "+" + fpa + "x+" + c + "x^2", fa + "+" + fpa + "(x-" + a + ")+" + c + "(x-" + a + ")^2"])
inputBox1 = Textfield(a)
Ltext = Simplify(If[a ≟ 0, fa + "+" + fpa + "x", fa + "+" + fpa + "(x-" + a + ")"])
text1: "$ f'(x)=" + (LaTeX[f']) + ",\, f''(x)=" + (LaTeX[f'']) + "$
$ f(" + (LaTeX[a]) + ")=" + (LaTeX[fa]) + ",\, f'(" + (LaTeX[a]) + ")=" + (LaTeX[fpa]) + ",\,f''(" + (LaTeX[a]) + ")=" + (LaTeX[f2pa]) + "$
$ L(x)=" + (LaTeX[Ltext]) + "$
$ Q(x) = " + (LaTeX[Qtext]) + "$"