有理数排序 by Celia Jimenez (2)

GeoGebra 命令及参数

1. Polygon(K, L, V, W) → poly2, k_1, l, v, w_1
2. Polygon(L, V, U, M) → poly3, l_1, v_1, u, m
3. Polygon(M, U, T, N) → poly4, m_1, u_1, t, n
4. Segment(I, H) → a
5. Segment(H, Z) → c
6. Segment(Z, F) → d
7. Segment(F, G) → e
8. Segment(A_1, Aact) → f
9. Segment(C_1, Cact) → g
10. Segment(D_1, Dact) → h
11. Segment(B_1, Eact) → i
12. Sort({x(A_1), x(B_1), x(C_1), x(D_1)}) → list1
13. If(IndexOf[E, Sort[{A1, B1, C1, D1}]] ≟ IndexOf[x(B_1), Sort[{x(A_1), x(B_1), x(C_1), x(D_1)}]], 1) → orderB
14. If(IndexOf[A, Sort[{A1, B1, C1, D1}]] ≟ IndexOf[x(A_1), Sort[{x(A_1), x(B_1), x(C_1), x(D_1)}]], 1) → orderA
15. Sort({A1, B1, C1, D1}) → Test
16. If(IndexOf[C, Sort[{A1, B1, C1, D1}]] ≟ IndexOf[x(C_1), Sort[{x(A_1), x(B_1), x(C_1), x(D_1)}]], 1) → orderC
17. If(IndexOf[D, Sort[{A1, B1, C1, D1}]] ≟ IndexOf[x(D_1), Sort[{x(A_1), x(B_1), x(C_1), x(D_1)}]], 1) → orderD
18. RandomElement({2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12}) → Ddenom
19. RandomElement({-9, -8, -7, -6, -5, -4, -3, -2, -1, 1, 2, 3, 4, 5, 6, 7, 8, 9}) → Dwhole
20. Polygon(J, X, W, K) → poly1, j, E_1, w, k