分数比较 by matte Lena

GeoGebra 命令及参数

1. Point(yAxis) → A
2. Point(Circle[A, 10]) → B
3. Segment(A, B) → a
4. OrthogonalLine(A, a) → b
5. OrthogonalLine(B, a) → c
6. Circle(A, 1) → d
7. Circle(B, 1) → e
8. Intersect(d, b, 2) → C
9. Intersect(e, c, 2) → D
10. Polygon(A, B, D, C) → poly1, a_2, b_1, d_1, c_1
11. FractionText(n / i) → text1
12. Sequence(Polygon[(r, 0), (r + a / i, 0), (r + a / i, 1), (r, 1)], r, 0, (n * a / i) - a / i, a / i) → list2
13. Sequence(Polygon[(p, 0), (p + a / i, 0), (p + a / i, 1), (p, 1)], p, 0, a - a / i, a / i) → list1
14. Sequence(Polygon[(q, 2), (q + a / j, 2), (q + a / j, 3), (q, 3)], q, 0, a - a / j, a / j) → list3
15. Sequence(Polygon[(r, 2), (r + a / j, 2), (r + a / j, 3), (r, 3)], r, 0, (k * a / j) - a / j, a / j) → list4
16. FractionText(k / j) → text6