V (x_0, y_0)

f(x) = 4.0 * x^(2.0) - 24.0 * x + 27.0
V = Extremum(f)
x_0: x(V)
y_0: f(x_0)
i: y = y_0
j = OrthogonalLine(V, xAxis)
a: f''(0.0) / 2.0
b: -2.0 * a * x_0
x0: round(100.0 * x_0) / 100.0
y0: round(100.0 * y_0) / 100.0
texto1: "y\;=\;" + (If[a ≟ 1.0, "", If[a ≟ -1.0, "-", "" + a]]) + (If[x0 ≟ 0.0, "\;x^2", "\;(x"]) + (If[x0 ≟ 0.0, "", If[x0 > 0.0, "-\;" + (abs(x0)), "+\;" + (abs(x0))]]) + (If[x0 ≟ 0.0, "", ")^2"]) + (If[y0 ≟ 0.0, "", If[y0 > 0.0, "+\;" + (abs(y0)), "-\;" + (abs(y0))]])
texto2: "y = " + f
c: f(0.0)
A, B = Root(f)
x_1: x(A)
x_2: x(B)