用数轴和矩形比较分数大小

GeoGebra 命令及参数

1. Segment(A, B) → c
2. Dilate(A, 0.3333333333333333, B) → A'
3. Dilate(A, 0.6666666666666666, B) → A'_1
4. OrthogonalLine(A, c) → d
5. Vector(A, C) → u
6. Translate(A'_1, u) → E
7. Translate(A', u) → A''
8. Translate(B, u) → B'
9. Vector(A, D) → v
10. Translate(A'_1, v) → F
11. Translate(A', v) → A''_1
12. Translate(B, v) → B'_1
13. Translate(C, v) → C'
14. Translate(E, v) → E'
15. Translate(A'', v) → A'''
16. Translate(B', v) → B''
17. Segment(A, C) → e
18. Segment(C, B') → f
19. Segment(B', B) → g
20. Segment(A', A'') → h
21. Segment(E, A'_1) → i
22. Segment(D, C') → j
23. Segment(C', B'') → k
24. Segment(B'', B'_1) → l
25. Segment(B'_1, D) → m
26. Segment(F, E') → n
27. Segment(A''_1, A''') → p
28. Polygon(A, C, (x(C) + (a * w / d1), y(C)), (x(A) + (a * w / d1), y(A))) → poly1, a_1, c_1, q, r
29. Polygon(D, C', (x(C') + (b * w / d2), y(C')), (x(D) + (b * w / d2), y(D))) → poly2, d_1, c', s, t
30. Sequence(Segment[(x(A) + (w * i / ed1), y(C)), (x(A) + (w * i / ed1), y(A))], i, 1, (3 * ed1) - 1, 1) → list1
31. Sequence(Segment[(x(A) + (w * i / ed2), y(C')), (x(A) + (w * i / ed2), y(D))], i, 1, (3 * ed2) - 1, 1) → list2
32. Vector(A, (x(A) + (a * w / d1), y(A))) → arrow1
33. Sequence((x(A) + (w * i / ed1), y(A)), i, 0, (3 * ed1), 1) → listdot1
34. Sequence((x(D) + (w * i / ed2), y(D)), i, 0, (3 * ed2), 1) → listdot2
35. Vector(D, (x(D) + (b * w / d2), y(D))) → arrow2