面积单位换算：把km²、ha、dm²、m²换成mm²或cm²

GeoGebra 命令及参数

1. Polygon(T_1, M_1, N_1, U_1) → q1, l_1, m_1, n_1, e_2
2. Shuffle(Sequence[Random[1, 9], i, 1, 100]) → RandomNos1, {1, 8, 5, 6, 3, 8, 5, 7, 4, 8, 4, 5, 7, 3, 3, 2, 4, 7, 3, 4, 2, 8, 1, 9, 4, 3, 2, 2, 5, 8, 7, 6, 8, 8, 7, 5, 8, 5, 1, 4, 4, 6, 7, 6, 5, 7, 2, 9, 8, 8, 2, 1, 1, 8, 4, 9, 3, 4, 3, 6, 3, 2, 7, 7, 4, 1, 7, 5, 5, 2, 2, 9, 7, 8, 8, 3, 3, 7, 7, 4, 6, 4, 7, 4, 1, 8, 7, 3, 6, 8, 5, 8, 2, 8, 5, 3, 8, 4, 4, 2}
3. RandomElement(RandomNos1) → Num1
4. TableText({"\vphantom{\frac{1}{2}}km^2", "ha", "a", "m^2", "dm^2", "cm^2", "mm^2"}, {"\vphantom{\large{\frac{1}{2}}}\hspace{4cm}", "\hspace{4cm}", "\hspace{4cm}", "\hspace{4cm}", "\hspace{4cm}", "\hspace{4cm}", "\hspace{4cm}"}, "c_|h") → text6
5. Sequence(((i * 1), 1.55), i, -8, 5, 2) → l1
6. Sequence(Midpoint[l1(i), l1(i + 1)] - (0, 0.4), i, 1, Length[l1] - 1) → Ms
7. Sequence(CircleArc[Ms(i), l1(i + 1), l1(i)], i, 1, Length[Ms]) → l4
8. Sequence(Text["$\textsf{100}$", Midpoint[l1(i), l1(i + 1)] + (0, dy), true, true, 0], i, 1, Length[l1] - 1) → l3
9. Point(allowedPos) → A
10. Polygon(A, (x(A), y(A) - 0.4), (x(A) + 0.5, y(A) - 0.4), (x(A) + 0.5, y(A))) → q2, f, g, h, i
11. Sequence(((i * 1), -0.6), i, -8, 5, 2) → l5
12. Sequence(((i * 1), -1.03), i, -8, 5, 2) → l2
13. Point(l2) → D
14. Point(l5) → E
15. Segment(D, E) → j
16. Point(l2) → F
17. Point(l5) → G
18. Segment(F, G) → k
19. Point(l2) → H
20. Point(l5) → I
21. Segment(H, I) → l
22. Point(l2) → J
23. Point(l5) → K
24. Segment(J, K) → m
25. Point(l2) → L
26. Point(l5) → M
27. Segment(L, M) → n
28. Point(l2) → N
29. Point(l5) → O
30. Segment(N, O) → p
31. Point(l2) → P
32. Point(l5) → Q
33. Segment(P, Q) → q