用数轴和圆比较分数大小 by Karen Reyes

GeoGebra 命令及参数

1. Segment(A, A + (unitsize1, 0)) → line1
2. Segment(B, B + (unitsize2, 0)) → line2
3. Sequence((x(A) + (i * unitsize1 / denominator1), y(A)), i, 1, denominator1) → numdots1
4. Sequence((x(B) + (i * unitsize2 / denominator2), y(B)), i, 1, denominator2) → numdots2
5. Segment(E, (x(E), y(E) - (y(A) - y(B)))) → showcomparison_1
6. Segment(A, E) → showfrac1_1
7. Segment(B, F) → showfrac2_1
8. Circle(G, unitradius) → c
9. Point(c) → H
10. Segment(G, H) → a
11. Rotate(G, (360 * ° / denominator1), G) → G'
12. Sequence(Segment[Rotate[G, ((i * 360) * ° / denominator1), G], Rotate[H, ((i * 360) * ° / denominator1), G]], i, 1, denominator1) → denominatorwedges1
13. Circle(I, unitradius) → d
14. Point(d) → J
15. Segment(I, J) → b
16. Sequence(Segment[Rotate[I, ((i * 360) * ° / denominator2), I], Rotate[J, ((i * 360) * ° / denominator2), I]], i, 1, denominator2) → denominatorwedges2
17. Rotate(H, ((numerator1 * 360) * ° / denominator1), G) → H'
18. Rotate(J, ((numerator2 * 360) * ° / denominator2), I) → J'
19. CircleSector(G, H, H') → numeratorwedge1
20. CircleSector(I, J, J') → numeratorwedge2
21. Polygon(K, (x(K), y(K) - boxheight), (x(K) + boxwidth, y(K) - boxheight), (x(K) + boxwidth, y(K))) → poly1, e, f, g, h
22. Polygon(L, (x(L), y(L) - boxheight), (x(L) + boxwidth, y(L) - boxheight), (x(L) + boxwidth, y(L))) → poly2, l, i, j, k