Coordinate Activity: Boat

Coordinate Activity: Boat
Loading the math board and drawing, please wait…
2012-12-01 23:03
In collections Geometry CK12 CH01 Basics
This example demonstrates how to construct a boat shape in a coordinate system, involving core mathematical concepts such as coordinate geometry, linear functions, and geometric transformations. Construction highlights include using commands and objects like Random, Circle, Ray, OrthogonalLine, Intersect, CircumcircleArc, Midpoint, Sequence, If, Segment, Polygon, Line, Rotate, Mod, Point, Text in GeoGebra. Suitable for high school students learning coordinate geometry and geometric construction.

GeoGebra Commands & Parameters

  1. Random(-10, 10) → bb
  2. Random(-10, 10) → aa
  3. Random(-10, 10) → cc
  4. Random(4, 15) → rr
  5. Circle(A, (1.5 * v - 1) * rr) → c'
  6. Ray(A, (0, 0)) → a
  7. OrthogonalLine(A, a) → b
  8. Intersect(c', b) → B, C
  9. Intersect(c', a) → D, T
  10. CircumcircleArc(B, D, C) → d
  11. Midpoint(C, D) → E
  12. Midpoint(B, D) → F_2
  13. Ray(A', E) → e
  14. Ray(A', F_2) → f
  15. Intersect(d, e) → G,
  16. Intersect(d, f) → H,
  17. CircumcircleArc(G, D, H) → g
  18. Circle(I, 1) → h
  19. Sequence(Text[If[s < 10, " ", ""] + (s), (21.6 + 2 * Mod[s - 1, 3], 7.75 - 2 * Div[s - 1, 3])], s, 1, 12) → liste3
  20. Circle(J, 1) → k
  21. Sequence(Text[If[s ≟ 1, " ", If[s < 5, " ", ""]] + (30 * (s - 1)) + "º", (21.25 + 2 * Mod[s - 1, 3], -6.25 - 2 * Div[s - 1, 3])], s, 1, 12) → liste4
  22. If(yB > -5, 5*°, (((xB - 3 * yB) / 2 - 19 - 1) * 30)°) → ang
  23. If(ang ≟ α ∧ dist ≟ rr, true, false) → raz
  24. Segment(O, N) → m
  25. Circle(A, (2 * v - 1) * rr - n) → p
  26. Sequence(Circle[A, (1.5 * v - 1) * rr - i], i, 0, n, n / 10) → liste5
  27. Polygon(P, Q, R, S) → poly1, p_1, q, r_1, s
  28. Circle((0, 0), If[2 * v * rr > 12, 0, 2 * v * rr]) → c
  29. Midpoint(K, L) → U
  30. Midpoint(U, L) → V
  31. Midpoint(U, V) → W
  32. Midpoint(V, L) → Z
  33. Segment(K, C_1) → l
  34. Line(A, l) → i
  35. Segment(A, U) → t
  36. Intersect(c, t) → A_1, B_1
  37. Segment(U, A_1) → a_1
  38. Rotate(C_1, 6 * v, U) → L'
  39. Segment(U, L') → b_1
  40. Mod(v * 100, 2) → ab
  41. Segment(O, D_1) → j
  42. Circle(O, C_1) → g_1
  43. Point(g_1) → E_1
  44. Segment(O, E_1) → h_1
  45. Circle(F_1, 6.5 - abs(r / 4.5)) → q_1
  46. Line(F_1, l) → i_1
  47. Intersect(q_1, i_1) → G_1, H_1
  48. Line(J_1, r_1) → j_1
  49. Point(j_1) → N_1
  50. Line(N_1, l) → l_1
  51. Line(J_1, l) → m_1
  52. Point(m_1) → O_1
  53. Point(l_1) → P_1
  54. Intersect(l_1, r_1) → M_1
  55. Polygon(M_1, N_1, J_1, F) → poly2, m_2, n_1, j_2, f_2
  56. Point(l_1) → Q_1
  57. Point(m_1) → R_1
  58. Polygon(P_1, Q_1, R_1, O_1) → poly3, p_2, q_2, r_2, o_1
  59. Point(j_1) → S_1
  60. Polygon(S_1, T_1, O_1, J_1) → poly4, s_1, t_1, o_2, j_3
  61. Midpoint(s_1) → V_1
  62. Midpoint(o_2) → W_1
  63. Midpoint(S_1, J_1) → Z_1
  64. Midpoint(t_1) → A_2
  65. Segment(V_1, W_1) → a_2
  66. Segment(Z_1, A_2) → b_2
  67. Intersect(b_2, a_2) → B_2
  68. Circle(B_2, V_1) → c_2
  69. Sequence((x(O) + i, y(D_1)), i, -11, 11, 1) → liste1
  70. Sequence((x(N) + i, y(N)), i, -11, 11, 1) → liste6
  71. Sequence((x(C_1), y(C_1) + i), i, -11, 11, 1) → liste7
  72. Sequence((x(E_1), y(E_1) + i), i, -11, 11, 1) → liste8
  73. Ray(M_1, T_1) → c_1
  74. Sequence(Segment[Element[liste8, i], Element[liste7, i]], i, 0, 22) → liste10
  75. Sequence((x(D_1) + i, 0), i, -11, 11) → liste2
  76. Sequence(Segment[Element[liste1, i], Element[liste6, i]], i, 0, 22) → liste9
  77. Line(S, P) → d_1
  78. Line(J_1, S_1) → e_1
  79. Line(Q_1, e_1) → f_1
  80. Intersect(d_1, s) → M
  81. Intersect(d_1, f_1) → C_2
  82. Line(R, d_1) → k_1
  83. Intersect(e_1, k_1) → D_2
  84. Polygon(S, C_2, Q_1, S_1, D_2, R) → poly5, s_2, c_3, q_3, s_3, d_2, r_3
  85. Point(d_1) → E_2
  86. Line(E_2, p_1) → e_2
  87. Intersect(k_1, e_2) → G_2
  88. Polygon(E_2, P, Q, G_2) → poly6, e_3, p_3, q_4, g_2
  89. Sequence(O + (i, 0), i, -10, 10) → liste11
  90. Sequence(O + (0, i), i, -10, 10) → liste12
  91. Sequence(i, i, -10, 10) → liste13
  92. Sequence(Text[Element[liste13, i], (x(Element[liste11, i] - 0.42), y(Element[liste11, i] - 0.85))], i, 1, Length[liste13], 2) → liste14
  93. Sequence(Text[Element[liste13, i], (x(Element[liste12, i] - 1), y(Element[liste12, i] - 0.31))], i, 1, Length[liste13], 2) → liste15
  94. Text(score) → text2
  95. If(o ≟ aa, 1, 0) → addonx
  96. If(r ≟ bb, 1, 0) → addony

AI Drawing Prompt Reference

Draw a boat shape in a coordinate system by first generating random points as references, then using circles and rays to construct the boat's outline, followed by geometric transformations like rotation and reflection to create details, and finally adding text labels for angles and positions, involving core concepts of coordinate geometry, linear functions, and geometric transformations.
The prompt above was compiled from the original drawing commands and is for reference only.