等差數列
Author: 藍邦偉  老師

a = -0.3 (slider from -5 to 5, step 0.1)
d = -0.8 (slider from -5 to 5, step 0.1)
b: y = d * x + a - d
O: Corner[1] + (2, 2)
c = Line(O, xAxis)
e = Line(O, yAxis)
T_1: (x(Corner[1]), y(O))
T_2: (x(Corner[2]), y(O))
T_3: (x(O), y(Corner[1]))
T_4: (x(O), y(Corner[4]))
u_1 = Vector(T_1, T_2)
v_1 = Vector(T_3, T_4)
A = Intersect(yAxis, xAxis)
t = Vector(A, O)
O_1: Corner[4] + (2, -2)
u_2 = Vector((x(T_1), y(O_1)), (x(T_2), y(O_1)))
A1 = 1
A2 = 2
A3 = 3
A4 = 4
A5 = 5
A6 = 6
A7 = 7
A8 = 8
A9 = 9
A10 = 10
A11 = 11
A12 = 12
A13 = 13
A14 = 14
A15 = 15
A16 = 16
A17 = 17
A18 = 18
A19 = 19
A20 = 20
B1: d * A1 + a - d
B2: d * A2 + a - d
B3: d * A3 + a - d
B4: d * A4 + a - d
B5: d * A5 + a - d
B6: d * A6 + a - d
B7: d * A7 + a - d
B8: d * A8 + a - d
B9: d * A9 + a - d
B10: d * A10 + a - d
B11: d * A11 + a - d
B12: d * A12 + a - d
B13: d * A13 + a - d
B14: d * A14 + a - d
B15: d * A15 + a - d
B16: d * A16 + a - d
B17: d * A17 + a - d
B18: d * A18 + a - d
B19: d * A19 + a - d
B20: d * A20 + a - d
P_1: (A1, B1)
P_2: (A2, B2)
P_3: (A3, B3)
P_4: (A4, B4)
P_5: (A5, B5)
P_6: (A6, B6)
P_7: (A7, B7)
P_8: (A8, B8)
P_9: (A9, B9)
P_{10}: (A10, B10)
P_{11}: (A11, B11)
P_{12}: (A12, B12)
P_{13}: (A13, B13)
P_{14}: (A14, B14)
P_{15}: (A15, B15)
P_{16}: (A16, B16)
P_{17}: (A17, B17)
P_{18}: (A18, B18)
P_{19}: (A19, B19)
P_{20}: (A20, B20)
集合1: {P_1, P_2, P_3, P_4, P_5, P_6, P_7, P_8, P_9, P_{10}, P_{11}, P_{12}, P_{13}, P_{14}, P_{15}, P_{16}, P_{17}, P_{18}, P_{19}, P_{20}}
C = Translate(P_2, t)
D = Translate(P_3, v_1)
E = Translate(P_3, t)
F = Translate(P_4, t)
G = Translate(P_5, t)
H = Translate(P_6, t)
I = Translate(P_7, t)
J = Translate(P_8, t)
K = Translate(P_9, t)
L = Translate(P_{10}, t)
M = Translate(P_{11}, t)
N = Translate(P_{12}, t)
P = Translate(P_{13}, t)
Q = Translate(P_{14}, t)
R = Translate(P_{15}, t)
S = Translate(P_{16}, t)
T = Translate(P_{17}, t)
U = Translate(P_{18}, t)
V = Translate(P_{19}, t)
W = Translate(P_{20}, t)
B_1 = Translate(P_1, t)
t_1 = Vector(A, O_1)
C_1 = Translate(P_1, t_1)
D_1 = Translate(P_2, t_1)
E_1 = Translate(P_3, t_1)
F_1 = Translate(P_4, t_1)
G_1 = Translate(P_5, t_1)
H_1 = Translate(P_6, t_1)
I_1 = Translate(P_7, t_1)
J_1 = Translate(P_8, t_1)
K_1 = Translate(P_9, t_1)
L_1 = Translate(P_{10}, t_1)
M_1 = Translate(P_{11}, t_1)
N_1 = Translate(P_{12}, t_1)
Q_1 = Translate(P_{13}, t_1)
R_1 = Translate(P_{14}, t_1)
S_1 = Translate(P_{15}, t_1)
U_1 = Translate(P_{16}, t_1)
V_1 = Translate(P_{17}, t_1)
W_1 = Translate(P_{18}, t_1)
Z_1 = Translate(P_{19}, t_1)
A_2 = Translate(P_{20}, t_1)
n = 5 (slider from 1 to 20, step 1)
文字2: "等差數列:a_" + (LaTeX[n]) + "=" + (LaTeX[a]) + "+" + (LaTeX[n - 1]) + "(" + (LaTeX[If[d < 0, "-", ""]]) + "" + (LaTeX[abs(d)]) + ")=" + (LaTeX[a + (n - 1) * d]) + ""
文字1: "等差數列:a_" + (LaTeX[n]) + "=" + (LaTeX[a]) + "+" + (LaTeX[n - 1]) + "(" + (LaTeX[If[d < 0, "-", ""]]) + "" + (LaTeX[abs(d)]) + ")=" + (LaTeX[a + (n - 1) * d]) + ""