三次函數的圖形
Author: 劉長明

a=

b=

c=

d=

e=

反曲點

最大最小值

u = Vector((x(Corner[1]), 0), (x(Corner[3]), 0))
v = Vector((0, y(Corner[1])), (0, y(Corner[3])))
a = 1 (slider from -5 to 5, step 0.1)
b = 2 (slider from -5 to 5, step 0.1)
c = -2 (slider from -5 to 5, step 0.1)
d = -3 (slider from -5 to 5, step 0.1)
e = 0 (slider from -5 to 5, step 0.1)
f(x) = a * x^(4) + b * x^(3) + c * x^(2) + d * x + e
inputBox1 = Textfield(a)
inputBox2 = Textfield(b)
inputBox3 = Textfield(c)
inputBox4 = Textfield(d)
inputBox5 = Textfield(e)
A, B, C = Extremum(f)
D, E = TurningPoint(f)
text1: "當x=" + (LaTeX[x(B)]) + "時，y有最大值" + (LaTeX[y(B)]) + ""
text3: "反曲點" + (LaTeX[D]) + "，" + (LaTeX[E]) + ""
text2: "當x=" + (LaTeX[x(C)]) + "時,y有最小值" + (LaTeX[y(C)]) + ""
k = 5.253958547617285 (slider from y(Corner[1]) to y(Corner[3]), step 0.1)
g: y = k
F, G, H, I = Intersect(f, g)
h = true
i = true