二元一次方程组图解法

GeoGebra 命令及参数

1. Intersect(f, g) → A_0
2. Sequence(Segment[(x(T_1) + (2 * k), y(T_1)), (x(T_1) + (2 * k), y(T_1) + 2)], k, 0, 4) → t_1
3. Sequence(Segment[(x(T_1), y(T_1) + k), (x(T_1) + 8, y(T_1) + k)], k, 0, 2) → t_2
4. Sequence(Segment[(x(T_2) + (2 * k), y(T_2)), (x(T_2) + (2 * k), y(T_2) + 2)], k, 0, 4) → t_3
5. Sequence(Segment[(x(T_2), y(T_2) + k), (x(T_2) + 8, y(T_2) + k)], k, 0, 2) → t_4
6. Textfield(f) → InputBox1
7. Textfield(g) → InputBox2
8. Line(A_1, A_2) → f_2
9. Line(A_4, A_5) → g_2
10. Line(A_2, A_3) → f_3
11. Line(A_5, A_6) → g_3
12. Segment(B_2, A_0) → h
13. Segment(A_0, B_1) → i