整数乘法与几何作图

GeoGebra 命令及参数

1. Random(-9, 9) → a
2. Random(-9, 9) → b
3. If(a < 0, (-a), a) → r
4. If(b < 0, (-b), b) → c
5. Sequence(Circle[(1, 9) + (i, 0), 0.4], i, 0, c - 1) → l1
6. Point(yAxis) → A
7. Point(yAxis) → B
8. Vector(A, B) → u
9. Sequence(Vector[A, (0, 9) + (0, (-i))], i, 0, r) → l2
10. Sequence(Translate[l1, Vector[Element[l2, i]]], i, 1, d) → l3
11. Textfield(text3) → InputBox1
12. If(text3 ≟ text4, pic1, pic2) → pic3