MathPlotAI Logo MathPlotAI

Comparing Numbers - Ticket Machine

Comparing Numbers - Ticket Machine
Loading the math board and drawing, please wait…
2025-01-07 18:44
In collections Gegenzahl und Betrag einer rationalen Zahl
This example demonstrates how to compare two numbers, particularly in the context of a Ticket Machine. The core math concepts involved are the size of integers and absolute values. The construction involves using GeoGebra commands such as Join, Shuffle, Point, Polygon, Translate, and If to create the Ticket Machine graph and implement number comparison. It is suitable for 7-8 grade students, espec

GeoGebra Commands & Parameters

  1. Join(Sequence[Shuffle[Sequence[1, maxexnum]], m, 1, floor(110 / maxexnum)]) → listExnum
  2. Shuffle(Join[{Sequence[1, m, 1, 6], Sequence[2, m, 1, 6]}]) → listModus, {2, 1, 1, 2, 2, 1, 2, 2, 1, 2, 1, 1}
  3. Point(Line[StartBox1, xAxis]) → StartBox2
  4. Polygon(StartBox1, StartBox1 + (boxsize, 0), StartBox1 + (boxsize, boxsize), StartBox1 + (0, boxsize)) → Box1, box4, box1, box2, box3
  5. Translate(Box1, StartBox2 - StartBox1) → Box2
  6. If(abs(numX) < abs(numY) ∧ modus ≟ 1 ∨ abs(numX) > abs(numY) ∧ modus ≟ 2, 1, 2) → solP1
  7. Element({2, 1}, solP1) → solP2
  8. Textfield(input1) → Eingabefeld1
  9. Textfield(input2) → Eingabefeld2
  10. Shuffle(Sequence[Random[0, 10], i, 1, 100]) → randomNosForX, {4, 3, 3, 5, 10, 8, 4, 1, 6, 10, 5, 3, 6, 1, 8, 9, 7, 4, 7, 9, 8, 5, 2, 7, 5, 6, 0, 8, 6, 3, 5, 10, 2, 5, 5, 5, 2, 5, 2, 4, 1, 8, 9, 5, 3, 6, 6, 1, 9, 9, 0, 2, 1, 0, 10, 3, 6, 8, 7, 6, 4, 2, 5, 10, 7, 0, 7, 5, 8, 8, 6, 7, 3, 4, 9, 1, 7, 7, 7, 4, 8, 4, 10, 0, 4, 6, 9, 4, 5, 9, 1, 5, 6, 0, 1, 6, 9, 4, 7, 1}
  11. Shuffle(Sequence[Random[0, 10], i, 1, 100]) → randomNosForY, {8, 6, 3, 6, 4, 7, 7, 0, 2, 2, 9, 1, 4, 3, 0, 10, 5, 8, 8, 0, 4, 4, 8, 1, 3, 1, 7, 7, 10, 7, 7, 6, 0, 6, 5, 10, 9, 6, 4, 8, 5, 1, 5, 1, 10, 0, 2, 7, 5, 7, 10, 8, 1, 7, 8, 9, 5, 7, 4, 10, 5, 10, 8, 4, 7, 1, 3, 7, 2, 7, 10, 0, 4, 4, 1, 9, 6, 7, 6, 8, 8, 2, 2, 3, 10, 4, 8, 4, 1, 6, 9, 8, 8, 3, 10, 8, 7, 1, 8, 9}
  12. Append(true, Sequence[If[randomNosForY(i) ≟ randomNosForY(i - 1), false, true], i, 2, 100]) → stayY
  13. PointIn(Circle[AutomatStart, 10]) → StartP
  14. Point(Line[AutomatStart, xAxis]) → AutomatStart2
  15. Element({Z1a, Z2a, Z3a, Z4a, Z5a, Z6a, Z7a, Z8a}, numZ1) → P1check
  16. Element({Z1a, Z2a, Z3a, Z4a, Z5a, Z6a, Z7a, Z8a}, numZ2) → P2check
  17. Element({textNumX_{1}, textNumX_{2}, textNumX_{3}, textNumX_{4}, textNumX_{5}, textNumX_{6}, textNumX_{7}, textNumX_{8}, textNumX_{9}, textNumX_{10}}, exnum) → textNumX
  18. Element({textNumY_{1}, textNumY_{2}, textNumY_{3}, textNumY_{4}, textNumY_{5}, textNumY_{6}, textNumY_{7}, textNumY_{8}, textNumY_{9}, textNumY_{10}}, exnum) → textNumY
  19. Polygon(AutomatStart, AutomatStart2, 4) → BoxAutomat, f, g, h, i, A, B
  20. Join({Sequence[Segment[Corner[4] + (RasterPixMat * ((k * RasterStepXY), 0)), Corner[4] + (RasterPixMat * ((k * RasterStepXY), RasterMaxY))], k, 0, RasterMaxX / RasterStepXY], Sequence[Segment[Corner[4] + (RasterPixMat * (0, (k * RasterStepXY))), Corner[4] + (RasterPixMat * (RasterMaxX, (k * RasterStepXY)))], k, 0, RasterMaxY / RasterStepXY]}) → RasterStrecken
  21. Join({Sequence[Text[UnicodeToLetter[65 + k], Midpoint[Corner[4] + (RasterPixMat * ((k * RasterStepXY), RasterMaxY)), Corner[4] + (RasterPixMat * (((k + 1) * RasterStepXY), RasterMaxY))], false, true, 0, -1], k, 0, RasterMaxX / RasterStepXY - 1], Sequence[Text[("" * k), Midpoint[Corner[4] + (RasterPixMat * (RasterMaxX, ((k - 1) * RasterStepXY))), Corner[4] + (RasterPixMat * (RasterMaxX, (k * RasterStepXY)))], false, true, 1, 0], k, 1, RasterMaxY / RasterStepXY]}) → RasterBeschriftung
  22. Sequence(Sequence[Corner[4] + RasterPixMat((k * RasterStepXY), (m * RasterStepXY)), k, 0, RasterMaxX / RasterStepXY], m, 0, RasterMaxY / RasterStepXY) → RasterPunkte, {{(NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN)}, {(NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN)}, {(NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN)}, {(NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN)}, {(NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN)}, {(NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN)}, {(NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN)}, {(NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN)}, {(NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN)}, {(NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN)}, {(NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN)}, {(NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN)}, {(NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN), (NaN, NaN)}}
  23. Max(abs(numX), abs(numY)) → numBigger
  24. Min(abs(numX), abs(numY)) → numSmaller
  25. If(abs(numX) > abs(numY), 1, 2) → biggerNum
  26. Element({2, 1}, biggerNum) → smallerNum