使用比例比较甜点数量：GeoGebra 探索

GeoGebra 命令及参数

1. Join(Sequence[Sequence[(j, k), j, 0.5, 9.5, 1], k, 0.5, 4.5, 1]) → centers
2. Sequence(Circle[centers(k), 0.4], k, 1, Length[centers]) → circles
3. First(Shuffle[circles], CK) → dispCirc
4. Zip(IndexOf[A, circles], A, dispCirc) → positDispCircles
5. Intersect(xAxis, yAxis) → A
6. Polygon(A + (0.1, 0.1), (0.9, 0.1), 4) → squa1
7. Vector(A, (0, 1)) → transY
8. Vector(A, (1, 0)) → transX
9. Join(Sequence[Sequence[Translate[squa1, Vector[(m * transX) + (n * transY)]], m, 0, 9], n, 0, 4]) → squares
10. Zip(Element[squares, A], A, positDispCircles) → removedSquares
11. Polygon(A, B, C, D) → smallFrame, a, b, c, d
12. Length(squares) → lenSqua
13. Length(circles) → lenCir
14. Remove(squares, Zip[Element[squares, A], A, positDispCircles]) → squaresCleaned
15. First(Shuffle[squaresCleaned], SQ) → dispSqua
16. Polygon(A', B', C', D') → bigFrame, a', b', c', d'
17. GCD(CK, SQ) → mcd