自然数乘法演示

GeoGebra 命令及参数

1. Point(Circle[A, abs(Columns)]) → B
2. Segment(A, B) → a
3. OrthogonalLine(A, a) → b
4. OrthogonalLine(B, a) → c
5. Circle(A, Rows) → d
6. Intersect(d, b, 2) → C
7. Line(C, a) → e
8. Intersect(c, e) → D
9. Polygon(A, B, D, C) → poly1, a_2, b_1, d_1, c_1
10. Sequence(Segment[A + (i * (1, 0)), C + (i * (1, 0))], i, 1, Columns) → list1
11. Sequence(Segment[A + (i * (0, 1)), B + (i * (0, 1))], i, 1, Rows) → list2