A = (2, 1)
a = 1 (slider from -5 to 5, step 0.1)
f(x) = (a * x^(2))
c_1: y - y(A) = f(x - x(A))
b = 0.5 (slider from -5 to c, step 0.1)
c = 4.2 (slider from -5 to 5, step 0.1)
B: (b, 0)
C: (c, 0)
d = Segment(B, C)
D: (b, f(b - x(A)) + y(A))
E: (c, f(c - x(A)) + y(A))
e = Segment(B, D)
g = Segment(C, E)
h = CurveCartesian(t, f(t - x(A)) + y(A), t, b, c)
F: (0, y(D))
G: (0, y(A))
H: (0, y(E))
j = Segment(F, D)
k = Segment(H, E)
l = Segment(G, A)
텍스트1: "" + (LaTeX[b]) + " \le x \le " + (LaTeX[c]) + " \ \text{에서}"
텍스트2: "" + (LaTeX[c_1]) + " \ \text{의}"
M = If(x(D)  <  x(A)  <  x(E), Max[{y(D), y(E), y(A)}], Max[y(D), y(E)])
m = If(x(D)  <  x(A)  <  x(E), Min[{y(D), y(E), y(A)}], Min[y(D), y(E)])
텍스트3: "\text{최대:}" + (LaTeX[M]) + ""
텍스트4: "\text{최소:} " + (LaTeX[m]) + ""
i = Segment((0, m), (0, M))