MathPlotAI Logo MathPlotAI

Comparing and Ordering Natural Numbers and Fractions

Comparing and Ordering Natural Numbers and Fractions
Loading the math board and drawing, please wait…
2023-11-02 21:39
In collections Ordnen und Vergleichen von rationalen Zahlen Ordnen und Vergleichen von Bruchzahlen
This example demonstrates how to compare and order natural numbers as well as non-negative decimal and fractional numbers. The core math concepts involved include numerical comparison and ordering. Construction highlights: Utilizes GeoGebra commands and objects such as Polygon, Max, If, Textfield, Shuffle, Element, Append, Remove, Sequence, Length, Text, PointIn, CountIf. Suitable for students in

GeoGebra Commands & Parameters

  1. Polygon(allowedRect4, allowedRect3, allowedRect2, allowedRect1) → allowedRect, a_1, b, c, d
  2. Max(widthsOptionsR) → widthR
  3. Max(heightsOptionsR) → heightR
  4. Max(heightR, Max[heightsOptionsL]) → heightL
  5. Max(widthsOptionsL) → widthL
  6. If(isShuffleOptionsLechts, Shuffle[1…numOptionsR], 1…numOptionsR) → indizesOptionsRechts
  7. If(isShuffleOptionsLinks, Shuffle[1…numOptionsL], 1…numOptionsL) → indizesOptionsLinks
  8. Textfield(input1) → InputBox1
  9. Textfield(input2) → InputBox2
  10. Polygon(PtopLeftCornerFeedback, PtopRightCornerFeedback, PbottomRightCornerFeedback, PbottomLeftCornerFeedback) → rectangleCorrect, rectangleCorrectS3, rectangleCorrectS4, rectangleCorrectS2, rectangleCorrectS1
  11. Shuffle(Sequence[Random[0, 10], i, 1, 100]) → randomNosForX, {9, 6, 8, 10, 6, 10, 2, 0, 8, 10, 4, 1, 4, 1, 10, 10, 7, 0, 1, 3, 10, 5, 5, 1, 5, 3, 2, 10, 10, 10, 6, 5, 5, 7, 5, 4, 6, 7, 10, 8, 3, 0, 7, 5, 4, 3, 10, 6, 5, 10, 7, 5, 10, 8, 7, 7, 3, 4, 6, 9, 3, 0, 7, 6, 5, 0, 8, 0, 6, 4, 2, 6, 2, 8, 3, 2, 9, 1, 9, 0, 5, 10, 9, 6, 7, 4, 5, 2, 0, 8, 3, 6, 9, 5, 7, 2, 0, 2, 9, 9}
  12. Element(randomNosForX, Mod[questionCount, 100] + 1) → numX
  13. Shuffle(Sequence[Random[0, 10], i, 1, 100]) → randomNosForY, {1, 6, 2, 6, 7, 10, 0, 10, 7, 3, 0, 6, 4, 2, 3, 10, 5, 8, 1, 10, 0, 4, 2, 1, 6, 6, 3, 9, 8, 1, 10, 2, 1, 7, 10, 10, 1, 1, 8, 3, 4, 2, 3, 7, 9, 1, 10, 8, 6, 5, 4, 1, 0, 0, 2, 2, 6, 1, 5, 6, 0, 0, 0, 8, 10, 4, 2, 9, 5, 3, 8, 6, 4, 4, 7, 7, 0, 1, 7, 1, 6, 3, 1, 3, 7, 8, 4, 8, 3, 3, 4, 3, 9, 8, 3, 10, 10, 10, 7, 10}
  14. Element(randomNosForY, Mod[questionCount, 100] + 1) → numY
  15. Append(true, Sequence[If[randomNosForX(i) ≟ randomNosForX(i - 1), false, true], i, 2, 100]) → stayX
  16. Append(true, Sequence[If[randomNosForY(i) ≟ randomNosForY(i - 1), false, true], i, 2, 100]) → stayY
  17. Remove(Sequence[If[stayX(i), randomNosForX(i), 0], i, 1, 100], Sequence[0, i, 1, 100]) → randomNosForXwithoutRepeat
  18. Remove(Sequence[If[stayY(i), randomNosForY(i), 0], i, 1, 100], Sequence[0, i, 1, 100]) → randomNosForYwithoutRepeat
  19. Element(randomNosForXwithoutRepeat, Mod[questionCount, Length[randomNosForXwithoutRepeat]] + 1) → numXwithoutRepeat
  20. Element(randomNosForYwithoutRepeat, Mod[questionCount, Length[randomNosForYwithoutRepeat]] + 1) → numYwithoutRepeat
  21. Sequence(1) → positionsOptionsRechts
  22. Sequence(Element[optionsRAll, indizesOptionsRechts(i)], i, 1, numOptionsR) → optionsRActual
  23. Length(optionsRActual) → a
  24. Sequence(Element[optionsLAll, indizesOptionsLinks(i)], i, 1, numOptionsL) → optionsLActual
  25. Sequence(allOptionsL(indizesOptionsLinks(i)), i, 1, numOptionsL) → optionsL
  26. Sequence(allOptionsR(indizesOptionsLinks(i)), i, 1, numOptionsL) → optionsR
  27. Polygon((-10, -2), (10, -2), (10, 10), (-10, 10)) → q1, q_1, r_1, s_1, t_1
  28. Polygon(E, F, G, H) → q2, e_1, f_2, g_2, h_2
  29. Polygon(I, J, K, L) → q3, i_2, j_2, k_1, l_1
  30. Text(optionsLActual(1), CenterOptionL1, true, true, 0, 0) → opL1
  31. Text(optionsLActual(2), CenterOptionL2, true, true, 0, 0) → opL2
  32. Text(optionsLActual(3), CenterOptionL3, true, true, 0, 0) → opL3
  33. Text(optionsLActual(4), CenterOptionL4, true, true, 0, 0) → opL4
  34. PointIn(allowedRect) → CenterOptionR1
  35. Text(optionsRActual(1), CenterOptionR1, true, true, 0, 0) → opR1
  36. Polygon(CenterOptionR1, CenterOptionR1 - (widthR / 2, heightR / 2), CenterOptionR1 + (widthR / 2, ((-heightR)) / 2), CenterOptionR1 + (widthR / 2, heightR / 2), CenterOptionR1 - (widthR / 2, ((-heightR)) / 2), CenterOptionR1 - (widthR / 2, heightR / 2)) → rectRMove1, centeroptionr1, f, g, h, i, j
  37. PointIn(allowedRect) → CenterOptionR2
  38. Text(optionsRActual(2), CenterOptionR2, true, true, 0, 0) → opR2
  39. Polygon(CenterOptionR2, CenterOptionR2 - (widthR / 2, heightR / 2), CenterOptionR2 + (widthR / 2, ((-heightR)) / 2), CenterOptionR2 + (widthR / 2, heightR / 2), CenterOptionR2 - (widthR / 2, ((-heightR)) / 2), CenterOptionR2 - (widthR / 2, heightR / 2)) → rectRMove2, centeroptionr2, k, l, m, n, p
  40. PointIn(allowedRect) → CenterOptionR3
  41. Text(optionsRActual(3), CenterOptionR3, true, true, 0, 0) → opR3
  42. Polygon(CenterOptionR3, CenterOptionR3 - (widthR / 2, heightR / 2), CenterOptionR3 + (widthR / 2, ((-heightR)) / 2), CenterOptionR3 + (widthR / 2, heightR / 2), CenterOptionR3 - (widthR / 2, ((-heightR)) / 2), CenterOptionR3 - (widthR / 2, heightR / 2)) → rectRMove3, centeroptionr3, q, r, s, t, e
  43. PointIn(allowedRect) → CenterOptionR4
  44. Text(optionsRActual(4), CenterOptionR4, true, true, 0, 0) → opR4
  45. Polygon(CenterOptionR4, CenterOptionR4 - (widthR / 2, heightR / 2), CenterOptionR4 + (widthR / 2, ((-heightR)) / 2), CenterOptionR4 + (widthR / 2, heightR / 2), CenterOptionR4 - (widthR / 2, ((-heightR)) / 2), CenterOptionR4 - (widthR / 2, heightR / 2)) → rectRMove4, centeroptionr4, f_1, g_1, h_1, i_1, j_1
  46. If(CountIf[P ∈ answerRectLarger1(1), P, verticesR1] ≟ 4, 1, CountIf[P ∈ answerRectLarger2(1), P, verticesR1] ≟ 4, 2, CountIf[P ∈ answerRectLarger3(1), P, verticesR1] ≟ 4, 3, CountIf[P ∈ answerRectLarger4(1), P, verticesR1] ≟ 4, 4, -1) → indexAnswerR1
  47. If(CountIf[P ∈ answerRectLarger1(1), P, verticesR2] ≟ 4, 1, CountIf[P ∈ answerRectLarger2(1), P, verticesR2] ≟ 4, 2, CountIf[P ∈ answerRectLarger3(1), P, verticesR2] ≟ 4, 3, CountIf[P ∈ answerRectLarger4(1), P, verticesR2] ≟ 4, 4, -1) → indexAnswerR2
  48. If(CountIf[P ∈ answerRectLarger1(1), P, verticesR3] ≟ 4, 1, CountIf[P ∈ answerRectLarger2(1), P, verticesR3] ≟ 4, 2, CountIf[P ∈ answerRectLarger3(1), P, verticesR3] ≟ 4, 3, CountIf[P ∈ answerRectLarger4(1), P, verticesR3] ≟ 4, 4, -1) → indexAnswerR3
  49. If(CountIf[P ∈ answerRectLarger1(1), P, verticesR4] ≟ 4, 1, CountIf[P ∈ answerRectLarger2(1), P, verticesR4] ≟ 4, 2, CountIf[P ∈ answerRectLarger3(1), P, verticesR4] ≟ 4, 3, CountIf[P ∈ answerRectLarger4(1), P, verticesR4] ≟ 4, 4, -1) → indexAnswerR4
  50. CountIf(ind ≠ -1, ind, indizesAnswerR) → numAnswersDraggedToLeft
  51. If(correct, "\vphantom{✘}✓ Richtig", If[correctpartially, "\vphantom{✓}✘ Teilweise richtig", "\vphantom{✓}✘ Falsch"]) → correctTextTemp
  52. Text((("\Large\textsf{" * correctTextTemp) * "}"), PStartCorrectText, true, true, 1, 0) → correctText