絕對值不等式(2)
Author: 藍邦偉  老師

$ 絕對值不等式(2) $

$ Sol： $

b = 5 (slider from 1 to 5, step 1)
F: (x(Corner[1]), 0)
a_1: y(Corner[3] - Corner[2])
a_2: a_1 / 20
H: F + (0, a_2)
a = -1 (slider from -10 to 10, step 1)
A: (a, 0)
C: A - (b, 0)
D: C + (0, a_2)
B: A + (b, 0)
E: B + (0, a_2)
Poly1, c, d, e, f = Polygon(F, C, D, H)
G: (x(Corner[2]), 0)
I: G + (0, a_2)
Poly2, b_1, g, i, e_1 = Polygon(B, G, I, E)
v = Vector(E, I)
K_1: (x(Corner[1]), 0)
K_2: (x(Corner[2]), 0)
u = Vector(K_1, K_2)
D_q: K_1 + (0, a_2)
w = Vector(D, D_q)
h = LineBisector(C, A)
j = LineBisector(A, B)
J = (-0.14505332334910903, -3.17987561782438)
k = Line(J, u)
K = Intersect(h, k)
L = Intersect(j, k)
p = CircleArc(K, A, C)
q = CircleArc(L, B, A)
t_A: "$ A( " + (LaTeX[x(A)]) + ")$"
t_3: " $⇒x≤" + (LaTeX[a - b]) + " \;或\;x≥ " + (LaTeX[a + b]) + "$ "
t_{Question}: "$試求不等式\; |x" + (LaTeX[If[a > 0, "-", If[a < 0, "+", ""]]]) + "" + (LaTeX[If[a ≠ 0, abs(a), ""]]) + "|≥ " + (LaTeX[b]) + "\;之解.$"
n = 0 (slider from 0 to If[a < 0, 3, 2], step 1)
t_2: "$ 上式表\;x\;到\;" + (LaTeX[a]) + "\;的距離大於等於\;" + (LaTeX[b]) + " $"
t_!: "$⇒ |x-(" + (LaTeX[a]) + ")|≥" + (LaTeX[b]) + " $"
R = (-10.034733730038292, 5.492885813265543)