MathPlotAI Logo MathPlotAI

New Numbers on the Number Line

New Numbers on the Number Line
Loading the math board and drawing, please wait…
2025-01-21 20:13
Coordinate Geometry
In collections Rationale Zahlen & Arbeiten mit der Zahlengerade
This example demonstrates marking new numbers on the number line. Key math concepts include comparing and ordering rational numbers, and representing them on the number line. It uses GeoGebra commands like Sequence, Element, Textfield, Join, etc. Suitable for 7-8 grade students.

GeoGebra Commands & Parameters

  1. Sequence(Random[1, 10], i, 1, 10) → randomNumbers, {2, 4, 1, 3, 8, 6, 3, 4, 1, 9}
  2. Element(randomNumbers, Mod[questionCount, Length[randomNumbers]] + 1) → randomNumber
  3. Textfield(input) → inputBox
  4. 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
  5. 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
  6. Sequence(Sequence[Corner[4] + (RasterPixMat * ((k * RasterStepXY), (m * RasterStepXY))), k, 0, RasterMaxX / RasterStepXY], m, 0, RasterMaxY / RasterStepXY) → RasterPunkte, {{(-0.39, 10.379999999999999), (0.6121097046413507, 10.379999999999999), (1.6142194092827014, 10.379999999999999), (2.616329113924052, 10.379999999999999), (3.618438818565403, 10.379999999999999), (4.620548523206754, 10.379999999999999), (5.622658227848104, 10.379999999999999), (6.624767932489455, 10.379999999999999), (7.626877637130806, 10.379999999999999), (8.628987341772156, 10.379999999999999), (9.631097046413506, 10.379999999999999), (10.633206751054857, 10.379999999999999), (11.635316455696207, 10.379999999999999), (12.637426160337558, 10.379999999999999), (13.639535864978908, 10.379999999999999), (14.641645569620259, 10.379999999999999), (15.643755274261611, 10.379999999999999), (16.64586497890296, 10.379999999999999), (17.647974683544312, 10.379999999999999), (18.65008438818566, 10.379999999999999)}, {(-0.39, 9.376913580246914), (0.6121097046413507, 9.376913580246914), (1.6142194092827014, 9.376913580246914), (2.616329113924052, 9.376913580246914), (3.618438818565403, 9.376913580246914), (4.620548523206754, 9.376913580246914), (5.622658227848104, 9.376913580246914), (6.624767932489455, 9.376913580246914), (7.626877637130806, 9.376913580246914), (8.628987341772156, 9.376913580246914), (9.631097046413506, 9.376913580246914), (10.633206751054857, 9.376913580246914), (11.635316455696207, 9.376913580246914), (12.637426160337558, 9.376913580246914), (13.639535864978908, 9.376913580246914), (14.641645569620259, 9.376913580246914), (15.643755274261611, 9.376913580246914), (16.64586497890296, 9.376913580246914), (17.647974683544312, 9.376913580246914), (18.65008438818566, 9.376913580246914)}, {(-0.39, 8.373827160493828), (0.6121097046413507, 8.373827160493828), (1.6142194092827014, 8.373827160493828), (2.616329113924052, 8.373827160493828), (3.618438818565403, 8.373827160493828), (4.620548523206754, 8.373827160493828), (5.622658227848104, 8.373827160493828), (6.624767932489455, 8.373827160493828), (7.626877637130806, 8.373827160493828), (8.628987341772156, 8.373827160493828), (9.631097046413506, 8.373827160493828), (10.633206751054857, 8.373827160493828), (11.635316455696207, 8.373827160493828), (12.637426160337558, 8.373827160493828), (13.639535864978908, 8.373827160493828), (14.641645569620259, 8.373827160493828), (15.643755274261611, 8.373827160493828), (16.64586497890296, 8.373827160493828), (17.647974683544312, 8.373827160493828), (18.65008438818566, 8.373827160493828)}, {(-0.39, 7.370740740740741), (0.6121097046413507, 7.370740740740741), (1.6142194092827014, 7.370740740740741), (2.616329113924052, 7.370740740740741), (3.618438818565403, 7.370740740740741), (4.620548523206754, 7.370740740740741), (5.622658227848104, 7.370740740740741), (6.624767932489455, 7.370740740740741), (7.626877637130806, 7.370740740740741), (8.628987341772156, 7.370740740740741), (9.631097046413506, 7.370740740740741), (10.633206751054857, 7.370740740740741), (11.635316455696207, 7.370740740740741), (12.637426160337558, 7.370740740740741), (13.639535864978908, 7.370740740740741), (14.641645569620259, 7.370740740740741), (15.643755274261611, 7.370740740740741), (16.64586497890296, 7.370740740740741), (17.647974683544312, 7.370740740740741), (18.65008438818566, 7.370740740740741)}, {(-0.39, 6.367654320987656), (0.6121097046413507, 6.367654320987656), (1.6142194092827014, 6.367654320987656), (2.616329113924052, 6.367654320987656), (3.618438818565403, 6.367654320987656), (4.620548523206754, 6.367654320987656), (5.622658227848104, 6.367654320987656), (6.624767932489455, 6.367654320987656), (7.626877637130806, 6.367654320987656), (8.628987341772156, 6.367654320987656), (9.631097046413506, 6.367654320987656), (10.633206751054857, 6.367654320987656), (11.635316455696207, 6.367654320987656), (12.637426160337558, 6.367654320987656), (13.639535864978908, 6.367654320987656), (14.641645569620259, 6.367654320987656), (15.643755274261611, 6.367654320987656), (16.64586497890296, 6.367654320987656), (17.647974683544312, 6.367654320987656), (18.65008438818566, 6.367654320987656)}, {(-0.39, 5.36456790123457), (0.6121097046413507, 5.36456790123457), (1.6142194092827014, 5.36456790123457), (2.616329113924052, 5.36456790123457), (3.618438818565403, 5.36456790123457), (4.620548523206754, 5.36456790123457), (5.622658227848104, 5.36456790123457), (6.624767932489455, 5.36456790123457), (7.626877637130806, 5.36456790123457), (8.628987341772156, 5.36456790123457), (9.631097046413506, 5.36456790123457), (10.633206751054857, 5.36456790123457), (11.635316455696207, 5.36456790123457), (12.637426160337558, 5.36456790123457), (13.639535864978908, 5.36456790123457), (14.641645569620259, 5.36456790123457), (15.643755274261611, 5.36456790123457), (16.64586497890296, 5.36456790123457), (17.647974683544312, 5.36456790123457), (18.65008438818566, 5.36456790123457)}, {(-0.39, 4.3614814814814835), (0.6121097046413507, 4.3614814814814835), (1.6142194092827014, 4.3614814814814835), (2.616329113924052, 4.3614814814814835), (3.618438818565403, 4.3614814814814835), (4.620548523206754, 4.3614814814814835), (5.622658227848104, 4.3614814814814835), (6.624767932489455, 4.3614814814814835), (7.626877637130806, 4.3614814814814835), (8.628987341772156, 4.3614814814814835), (9.631097046413506, 4.3614814814814835), (10.633206751054857, 4.3614814814814835), (11.635316455696207, 4.3614814814814835), (12.637426160337558, 4.3614814814814835), (13.639535864978908, 4.3614814814814835), (14.641645569620259, 4.3614814814814835), (15.643755274261611, 4.3614814814814835), (16.64586497890296, 4.3614814814814835), (17.647974683544312, 4.3614814814814835), (18.65008438818566, 4.3614814814814835)}, {(-0.39, 3.358395061728398), (0.6121097046413507, 3.358395061728398), (1.6142194092827014, 3.358395061728398), (2.616329113924052, 3.358395061728398), (3.618438818565403, 3.358395061728398), (4.620548523206754, 3.358395061728398), (5.622658227848104, 3.358395061728398), (6.624767932489455, 3.358395061728398), (7.626877637130806, 3.358395061728398), (8.628987341772156, 3.358395061728398), (9.631097046413506, 3.358395061728398), (10.633206751054857, 3.358395061728398), (11.635316455696207, 3.358395061728398), (12.637426160337558, 3.358395061728398), (13.639535864978908, 3.358395061728398), (14.641645569620259, 3.358395061728398), (15.643755274261611, 3.358395061728398), (16.64586497890296, 3.358395061728398), (17.647974683544312, 3.358395061728398), (18.65008438818566, 3.358395061728398)}, {(-0.39, 2.355308641975313), (0.6121097046413507, 2.355308641975313), (1.6142194092827014, 2.355308641975313), (2.616329113924052, 2.355308641975313), (3.618438818565403, 2.355308641975313), (4.620548523206754, 2.355308641975313), (5.622658227848104, 2.355308641975313), (6.624767932489455, 2.355308641975313), (7.626877637130806, 2.355308641975313), (8.628987341772156, 2.355308641975313), (9.631097046413506, 2.355308641975313), (10.633206751054857, 2.355308641975313), (11.635316455696207, 2.355308641975313), (12.637426160337558, 2.355308641975313), (13.639535864978908, 2.355308641975313), (14.641645569620259, 2.355308641975313), (15.643755274261611, 2.355308641975313), (16.64586497890296, 2.355308641975313), (17.647974683544312, 2.355308641975313), (18.65008438818566, 2.355308641975313)}, {(-0.39, 1.3522222222222258), (0.6121097046413507, 1.3522222222222258), (1.6142194092827014, 1.3522222222222258), (2.616329113924052, 1.3522222222222258), (3.618438818565403, 1.3522222222222258), (4.620548523206754, 1.3522222222222258), (5.622658227848104, 1.3522222222222258), (6.624767932489455, 1.3522222222222258), (7.626877637130806, 1.3522222222222258), (8.628987341772156, 1.3522222222222258), (9.631097046413506, 1.3522222222222258), (10.633206751054857, 1.3522222222222258), (11.635316455696207, 1.3522222222222258), (12.637426160337558, 1.3522222222222258), (13.639535864978908, 1.3522222222222258), (14.641645569620259, 1.3522222222222258), (15.643755274261611, 1.3522222222222258), (16.64586497890296, 1.3522222222222258), (17.647974683544312, 1.3522222222222258), (18.65008438818566, 1.3522222222222258)}, {(-0.39, 0.34913580246914044), (0.6121097046413507, 0.34913580246914044), (1.6142194092827014, 0.34913580246914044), (2.616329113924052, 0.34913580246914044), (3.618438818565403, 0.34913580246914044), (4.620548523206754, 0.34913580246914044), (5.622658227848104, 0.34913580246914044), (6.624767932489455, 0.34913580246914044), (7.626877637130806, 0.34913580246914044), (8.628987341772156, 0.34913580246914044), (9.631097046413506, 0.34913580246914044), (10.633206751054857, 0.34913580246914044), (11.635316455696207, 0.34913580246914044), (12.637426160337558, 0.34913580246914044), (13.639535864978908, 0.34913580246914044), (14.641645569620259, 0.34913580246914044), (15.643755274261611, 0.34913580246914044), (16.64586497890296, 0.34913580246914044), (17.647974683544312, 0.34913580246914044), (18.65008438818566, 0.34913580246914044)}, {(-0.39, -0.6539506172839449), (0.6121097046413507, -0.6539506172839449), (1.6142194092827014, -0.6539506172839449), (2.616329113924052, -0.6539506172839449), (3.618438818565403, -0.6539506172839449), (4.620548523206754, -0.6539506172839449), (5.622658227848104, -0.6539506172839449), (6.624767932489455, -0.6539506172839449), (7.626877637130806, -0.6539506172839449), (8.628987341772156, -0.6539506172839449), (9.631097046413506, -0.6539506172839449), (10.633206751054857, -0.6539506172839449), (11.635316455696207, -0.6539506172839449), (12.637426160337558, -0.6539506172839449), (13.639535864978908, -0.6539506172839449), (14.641645569620259, -0.6539506172839449), (15.643755274261611, -0.6539506172839449), (16.64586497890296, -0.6539506172839449), (17.647974683544312, -0.6539506172839449), (18.65008438818566, -0.6539506172839449)}, {(-0.39, -1.657037037037032), (0.6121097046413507, -1.657037037037032), (1.6142194092827014, -1.657037037037032), (2.616329113924052, -1.657037037037032), (3.618438818565403, -1.657037037037032), (4.620548523206754, -1.657037037037032), (5.622658227848104, -1.657037037037032), (6.624767932489455, -1.657037037037032), (7.626877637130806, -1.657037037037032), (8.628987341772156, -1.657037037037032), (9.631097046413506, -1.657037037037032), (10.633206751054857, -1.657037037037032), (11.635316455696207, -1.657037037037032), (12.637426160337558, -1.657037037037032), (13.639535864978908, -1.657037037037032), (14.641645569620259, -1.657037037037032), (15.643755274261611, -1.657037037037032), (16.64586497890296, -1.657037037037032), (17.647974683544312, -1.657037037037032), (18.65008438818566, -1.657037037037032)}, {(-0.39, -2.6601234567901173), (0.6121097046413507, -2.6601234567901173), (1.6142194092827014, -2.6601234567901173), (2.616329113924052, -2.6601234567901173), (3.618438818565403, -2.6601234567901173), (4.620548523206754, -2.6601234567901173), (5.622658227848104, -2.6601234567901173), (6.624767932489455, -2.6601234567901173), (7.626877637130806, -2.6601234567901173), (8.628987341772156, -2.6601234567901173), (9.631097046413506, -2.6601234567901173), (10.633206751054857, -2.6601234567901173), (11.635316455696207, -2.6601234567901173), (12.637426160337558, -2.6601234567901173), (13.639535864978908, -2.6601234567901173), (14.641645569620259, -2.6601234567901173), (15.643755274261611, -2.6601234567901173), (16.64586497890296, -2.6601234567901173), (17.647974683544312, -2.6601234567901173), (18.65008438818566, -2.6601234567901173)}}
  7. Textfield(input021) → InputBox021
  8. Textfield(input041) → InputBox041
  9. Textfield(input042) → InputBox042
  10. Textfield(input043) → InputBox043
  11. Textfield(input081) → InputBox081
  12. If(step < 6, (0.55, -0.52), (2.25, -1.25)) → PosMT111
  13. Rotate(PosT11 + (dimT, 0), ((-animationT) * 90°), PosT11) → PosT12
  14. PolyLine(PosSB, Corner[txt031, 2] + (-0.25, 0), Corner[txt031, 1] + (-0.1, 0), Corner[txt031, 4] + (-0.1, 0.1), Corner[txt031, 3] + (0.1, 0.1), Corner[txt031, 2] + (0.1, 0.35), PosSB) → sb03
  15. PolyLine(PosSB, Corner[txt041, 2] + (-0.25, -0.1), Corner[txt041, 1] + (-0.1, -0.1), Corner[txt041, 4] + (-0.1, 0.1), Corner[txt041, 3] + (0.1, 0.1), Corner[txt041, 2] + (0.1, 0.25), PosSB) → sb04
  16. PolyLine(PosSB, Corner[txt081, 2] + (-0.25, -0.1), Corner[txt081, 1] + (-0.1, -0.1), Corner[txt081, 4] + (-0.1, 0.1), Corner[txt081, 3] + (0.1, 0.1), Corner[txt081, 2] + (0.1, 0.25), PosSB) → sb08
  17. PolyLine(PosSB, Corner[txt011, 2] + (-0.25, -0.1), Corner[txt011, 1] + (-0.1, -0.1), Corner[txt011, 4] + (-0.1, 0.1), Corner[txt011, 3] + (0.1, 0.1), Corner[txt011, 2] + (0.1, 0.25), PosSB) → sb01
  18. PolyLine(PosSB, Corner[txt021, 2] + (-0.25, 0), Corner[txt021, 1] + (-0.1, 0), Corner[txt021, 4] + (-0.1, 0.1), Corner[txt021, 3] + (0.1, 0.1), Corner[txt021, 2] + (0.1, 0.35), PosSB) → sb02
  19. PolyLine(PosSB, Corner[txt051, 2] + (-0.25, 0), Corner[txt051, 1] + (-0.1, 0), Corner[txt051, 4] + (-0.1, 0.1), Corner[txt051, 3] + (0.1, 0.1), Corner[txt051, 2] + (0.1, 0.35), PosSB) → sb05
  20. PolyLine(PosSB, Corner[txt071, 2] + (0.1, 0.25), Corner[txt071, 2] + (0.1, 0), Corner[txt071, 1] + (-0.1, 0), Corner[txt071, 4] + (-0.1, 0.1), Corner[txt071, 3] + (0.1, 0.1), Corner[txt071, 2] + (0.1, 0.75), PosSB) → sb07
  21. PolyLine(PosSB, Corner[txt091, 2] + (-0.25, -0.1), Corner[txt091, 1] + (-0.1, -0.1), Corner[txt091, 4] + (-0.1, 0.1), Corner[txt091, 3] + (0.1, 0.1), Corner[txt091, 2] + (0.1, 0.25), PosSB) → sb09
  22. PolyLine(PosSB, Corner[txt101, 2] + (-0.25, 0), Corner[txt101, 1] + (-0.1, 0), Corner[txt101, 4] + (-0.1, 0.1), Corner[txt101, 3] + (0.1, 0.1), Corner[txt101, 2] + (0.1, 0.35), PosSB) → sb10
  23. SelectedIndex(dropdown011) → index011
  24. SelectedIndex(dropdown012) → index012
  25. SelectedIndex(dropdown031) → index031
  26. SelectedIndex(dropdown051) → index051
  27. SelectedIndex(dropdown071) → index071
  28. Segment(PosSegT11, PosSegT12) → segT1
  29. Point(segT1, parT2) → PosTEnd1
  30. Point(segT1, parT1) → PosTStart1
  31. Distance(PosTStart1, PosTEnd1) → lengthSegT
  32. Sequence(PosTStart1 + ((k * lengthSegT / 4) * UnitVector[segT1]), k, 0, 4, disT1) → PointListT1
  33. Sequence(-2 + k, k, 0, 4, disT1) → NumbersOnT1, {-2, -1, 0, 1, 2}
  34. Sequence(Segment[PointListT1(k) - (If[IsInteger[NumbersOnT1(k)] ∨ Mod[NumbersOnT1(k), 1] ≟ 0.5, segLength1, segLength2] * UnitOrthogonalVector[segT1]), PointListT1(k) + (If[IsInteger[NumbersOnT1(k)] ∨ Mod[NumbersOnT1(k), 1] ≟ 0.5, segLength1, segLength2] * UnitOrthogonalVector[segT1])], k, 1, Length[PointListT1]) → SegTAllList1
  35. KeepIf(Length[a] ≟ (2 * segLength1), a, SegTAllList1) → SegTList11
  36. KeepIf(Length[a] ≟ (2 * segLength2), a, SegTAllList1) → SegTList12
  37. If(step ≤ 3, 2 - 0.7, step ≟ 4, 2 - 1.6, step ≤ 11, 2 - 0.5) → standT1
  38. Translate(imgT1, Vector[PosT11, PosT21]) → imgT2
  39. Translate(imgT2, Vector[PosT11, PosT21]) → imgT3
  40. Sequence(-2 + k, k, 0, 4, disT2) → NumbersOnT2, {-2, -1.8, -1.6, -1.4, -1.2, -1, -0.8, -0.6000000000000001, -0.40000000000000013, -0.20000000000000018, 0, 0.20000000000000018, 0.40000000000000036, 0.6000000000000005, 0.8000000000000007, 1, 1.2000000000000002, 1.4000000000000004, 1.6000000000000005, 1.8000000000000007, 2}
  41. Sequence(-2 + k, k, 0, 4, disT3) → NumbersOnT3, {-2, -1.75, -1.5, -1.25, -1, -0.75, -0.5, -0.25, 0, 0.25, 0.5, 0.75, 1, 1.25, 1.5, 1.75, 2}
  42. Segment(PosSegT21, PosSegT22) → segT2
  43. Segment(PosSegT31, PosSegT32) → segT3
  44. Point(segT2, parT1) → PosTStart2
  45. Point(segT3, parT1) → PosTStart3
  46. Sequence(PosTStart2 + ((k * lengthSegT / 4) * UnitVector[segT2]), k, 0, 4, disT2) → PointListT2
  47. Sequence(PosTStart3 + ((k * lengthSegT / 4) * UnitVector[segT3]), k, 0, 4, disT3) → PointListT3
  48. Sequence(Segment[PointListT2(k) - (If[IsInteger[NumbersOnT2(k)] ∨ Mod[NumbersOnT2(k), 1] ≟ 0.5, segLength1, segLength2] * UnitOrthogonalVector[segT2]), PointListT2(k) + (If[IsInteger[NumbersOnT2(k)] ∨ Mod[NumbersOnT2(k), 1] ≟ 0.5, segLength1, segLength2] * UnitOrthogonalVector[segT2])], k, 1, Length[PointListT2]) → SegTAllList2
  49. Sequence(Segment[PointListT3(k) - (If[IsInteger[NumbersOnT3(k)] ∨ Mod[NumbersOnT3(k), 1] ≟ 0.5, segLength1, segLength2] * UnitOrthogonalVector[segT3]), PointListT3(k) + (If[IsInteger[NumbersOnT3(k)] ∨ Mod[NumbersOnT3(k), 1] ≟ 0.5, segLength1, segLength2] * UnitOrthogonalVector[segT3])], k, 1, Length[PointListT3]) → SegTAllList3
  50. KeepIf(Length[a] ≟ (2 * segLength1), a, SegTAllList2) → SegTList21
  51. KeepIf(Length[a] ≟ (2 * segLength2), a, SegTAllList2) → SegTList22
  52. KeepIf(Length[a] ≟ (2 * segLength1), a, SegTAllList3) → SegTList31
  53. KeepIf(Length[a] ≟ (2 * segLength2), a, SegTAllList3) → SegTList32
  54. Sequence(Text[ReplaceAll[(If[NumbersOnT1(k) ≟ -1.5, ((If[step ≥ 10, "\bold{\textcolor{db6114}{", "{{"] * "\textsf{\(-\)") * abs(NumbersOnT1(k))), ""] * "\vphantom{,}}}}"), ".", ","], PointListT1(k) + (((-segLength1) - 0.6) * UnitVector[Vector[PosT11, PosT12]]) + (0.065 * UnitOrthogonalVector[Vector[PosT11, PosT12]]) + (animationT * (-0.225, 0)), false, true, 0, 0], k, 1, Length[NumbersOnT1]) → CapT19
  55. Sequence(If[step ≟ 12, -3.5, -2.2] + k, k, 0, If[step ≟ 12, 7, 4.4], If[step ≟ 12, 0.5, 0.2]) → NumbersOnAxis, {-2.2, -2, -1.8000000000000003, -1.6, -1.4000000000000001, -1.2000000000000002, -1.0000000000000002, -0.8000000000000003, -0.6000000000000003, -0.40000000000000036, -0.20000000000000018, 0, 0.20000000000000018, 0.40000000000000036, 0.6000000000000005, 0.7999999999999998, 1, 1.2000000000000002, 1.4000000000000004, 1.6000000000000005, 1.7999999999999998, 2, 2.2}
  56. Sequence(Origin - ((parAxis * If[step ≟ 12, 7, 11]), 0) + (k * (parAxis, 0)), k, 0, Length[NumbersOnAxis] - 1) → PointAxis
  57. Segment(PointAxis(1) + ((-edgeAxis), 0), PointAxis(Length[PointAxis]) + (edgeAxis, 0)) → segAxis
  58. Sequence(Segment[PointAxis(k) + (0, If[IsInteger[NumbersOnAxis(k)], (-segLengthAxis1), (-segLengthAxis2)]), PointAxis(k) + (0, If[IsInteger[NumbersOnAxis(k)], segLengthAxis1, segLengthAxis2])], k, 1, Length[PointAxis]) → segAxisList
  59. Sequence(Text[(If[NumbersOnAxis(k) < 0 ∧ IsInteger[NumbersOnAxis(k)], "\(-\)", "\phantom{\(-\)}"] * If[IsInteger[NumbersOnAxis(k)], ("" * abs(NumbersOnAxis(k))), ""]), PointAxis(k) + (-0.166, (-segLengthAxis2) - 0.5), false, true, 0, 0], k, 1, 23) → CapAxis
  60. Sequence(Text[ReplaceAll[((("\textsf{" * If[Mod[NumbersOnT1(k), 1] ∈ {0} ∧ NumbersOnT1(k) < 0, "\(-\)", "\phantom{\(-\)}"]) * If[Mod[NumbersOnT1(k), 1] ∈ {0}, ("" * abs(NumbersOnT1(k))), ""]) * "\vphantom{,}}"), ".", ","], PointListT1(k) + ((segLength1 + 0.6) * UnitVector[Vector[PosT11, PosT12]]) + (0.065 * UnitOrthogonalVector[Vector[PosT11, PosT12]]) + (animationT * (-0.225, 0)), false, true, 0, 0], k, 1, Length[NumbersOnT1]) → CapT16
  61. Sequence((2.5, 6) + ((k * 2.25), 0), k, 0, 3) → ParkP11
  62. Sequence(Origin - ((parAxis * If[step ≟ 12, 7, 11]), 0) + (k * (parAxis / 2, 0)), k, 0, (2 * (Length[NumbersOnAxis] - 1))) → PointAxis12
  63. Join({ParkP11, PointAxis12}) → Points11
  64. Point(Points11) → Point111
  65. Point(Points11) → Point112
  66. Point(Points11) → Point113
  67. Sequence(-3.5 + (k * 0.25), k, 0, 28) → NumbersOnAxis12, {-3.5, -3.25, -3, -2.75, -2.5, -2.25, -2, -1.75, -1.5, -1.25, -1, -0.75, -0.5, -0.25, 0, 0.25, 0.5, 0.75, 1, 1.25, 1.5, 1.75, 2, 2.25, 2.5, 2.75, 3, 3.25, 3.5}
  68. Point(Join[{ParkP11, PointAxis12}]) → Point114
  69. Circle(Point111, radius11) → fb111
  70. Circle(Point112, radius11) → fb112
  71. Circle(Point113, radius11) → fb113
  72. Polygon((4.65, 0), (10, 0), (10, 6.75), (4.65, 6.75)) → DragArea, segDragArea1, segDragArea2, segDragArea3, segDragArea4
  73. PointIn(DragArea) → Point06
  74. If(step ≟ 1, correctdd011, step ≟ 6, correct061, step ≟ 7, correctdd071, step ≟ 8, correct081, step ≟ 9, animationT ≟ 1, step ≟ 11, anim121 ≟ 3 ∧ anim122 ≟ 3, step ≟ 2, true, correct021, step ≟ 3, correctdd031, step ≟ 4, correct041 ∧ correct042 ∧ correct043, step ≟ 5, correctdd051) → clickableBtnNext
  75. If(step ≟ 9, animationT ≟ 0 ∨ animationT ≟ 1, true) → clickableBtnBack
  76. If(step ≟ 2, Corner[txt022, 3] + (1, 0), step ≟ 4, PosT11 + (-0.35, -1.1), step ≟ 8, PosT11 + (-0.35, -0.25), (20, 1)) → PosShowSolution
  77. PolyLine(Point06 - dim6, Point06 + (x(dim6), (-y(dim6))), Point06 + dim6, Point06 + ((-x(dim6)), y(dim6)), Point06 - dim6) → seg061
  78. Sequence(Circle[PointL06(k), radius06], k, 1, Length[PointL06]) → CircleL06
  79. Sequence(Circle[PointR06(k), radius06], k, 1, Length[PointR06]) → CircleR06
  80. Sequence(StartPos111 + (k * (2.25, 0)), k, 0, 5) → PosList111
  81. Sequence(Origin + (((NumberList11(k) * parAxis) * 5), 0), k, 1, 6) → PosList112
  82. PolyLine(PosSB, Corner[txt121, 2] + (-0.25, 0), Corner[txt121, 1] + (-0.1, 0), Corner[txt121, 4] + (-0.1, 0.1), Corner[txt121, 3] + (0.1, 0.1), Corner[txt121, 2] + (0.1, 0.35), PosSB) → sb12
  83. Circle(Point114, radius11) → fb114
  84. Text("\textsf{\bold{\textcolor{9c4281}{\(-\)2\frac{1}{4}}}}", Point113 + (-0.166, 1.05), false, true, 0, 0) → CapP113
  85. Take(PosList112, 4, floor(3 + anim121)) → PointPos11
  86. Sequence(Text[ReplaceAll[(((("\textsf{" * If[NumbersOnT1(k) ≟ 0, "\bold{", "{"]) * If[Mod[NumbersOnT1(k), 1] ∈ {0, 0.5} ∧ NumbersOnT1(k) < 0, "\(-\)", "\phantom{\(-\)}"]) * If[Mod[NumbersOnT1(k), 1] ∈ {0, 0.5}, ("" * abs(NumbersOnT1(k))), ""]) * "\vphantom{,}}}"), ".", ","], PointListT1(k) + ((segLength1 + 0.6) * UnitVector[Vector[PosT11, PosT12]]) + (0.065 * UnitOrthogonalVector[Vector[PosT11, PosT12]]) + (animationT * (-0.225, 0)), false, true, 0, 0], k, 1, Length[NumbersOnT1]) → CapT1
  87. Sequence(Text[ReplaceAll[(((("\textsf{" * If[NumbersOnT2(k) ≟ 0, "\bold{", "{"]) * If[Mod[NumbersOnT2(k), 1] ∈ {0, 0.5} ∧ NumbersOnT2(k) < 0, "\(-\)", "\phantom{\(-\)}"]) * If[Mod[NumbersOnT2(k), 1] ∈ {0, 0.5}, ("" * abs(NumbersOnT2(k))), ""]) * "\vphantom{,}}}"), ".", ","], PointListT2(k) + ((segLength1 + 0.6) * UnitVector[Vector[PosT21, PosT21 + (dimT, 0)]]) + (0.065 * UnitOrthogonalVector[Vector[PosT21, PosT21 + (dimT, 0)]]) + (animationT * (-0.225, 0)), false, true, 0, 0], k, 1, Length[NumbersOnT2]) → CapT2
  88. Sequence(Text[ReplaceAll[(((("\textsf{" * If[NumbersOnT3(k) ≟ 0, "\bold{", "{"]) * If[Mod[NumbersOnT3(k), 1] ∈ {0, 0.5} ∧ NumbersOnT3(k) < 0, "\(-\)", "\phantom{\(-\)}"]) * If[Mod[NumbersOnT3(k), 1] ∈ {0, 0.5}, ("" * abs(NumbersOnT3(k))), ""]) * "\vphantom{,}}}"), ".", ","], PointListT3(k) + ((segLength1 + 0.6) * UnitVector[Vector[PosT31, PosT31 + (dimT, 0)]]) + (0.065 * UnitOrthogonalVector[Vector[PosT31, PosT31 + (dimT, 0)]]) + (animationT * (-0.225, 0)), false, true, 0, 0], k, 1, Length[NumbersOnT3]) → CapT3
  89. Take({PosList112(3), PosList112(2), PosList112(1)}, 1, floor(anim122)) → PointNeg11
  90. Sequence(Segment[PointAxis12(k) + (0, If[IsInteger[NumbersOnAxis12(k)], (-segLengthAxis1), (-segLengthAxis2)]), PointAxis12(k) + (0, If[IsInteger[NumbersOnAxis12(k)], segLengthAxis1, segLengthAxis2])], k, 1, Length[PointAxis12]) → segAxisList12
  91. Text("\bold{\textsf{\(-\)\scriptsize{\dfrac{1}{2}}}}", Point06 + (-0.05, 0.05), false, true, 0, 0) → Cap061
  92. Text((If[step ≥ 10, "\bold{\textcolor{db6114}{", "{{"] * "\textsf{\(-\)\scriptsize{\dfrac{1}{2}}}}}"), PointListT1(4) + ((segLength1 + 0.6) * UnitVector[Vector[PosT11, PosT12]]) + (0.065 * UnitOrthogonalVector[Vector[PosT11, PosT12]]) + (animationT * (-0.225, 0)), false, true, 0, 0) → CapT17
  93. Text("\textsf{\bold{\textcolor{9c4281}{\(-\)\frac{3}{2}}}}", Point111 + (-0.166, 1.05), false, true, 0, 0) → CapP111
  94. Text("\textsf{\bold{\textcolor{9c4281}{\(-\)0,5}}}", Point112 + (-0.166, 1), false, true, 0, 0) → CapP112
  95. Text("\textsf{\bold{\textcolor{9c4281}{\phantom{\(-\)}2,75}}}", Point114 + (-0.166, 1), false, true, 0, 0) → CapP114

AI Drawing Prompt Reference

Draw a horizontal line to represent a number line, mark integer points from -2 to 2 on it, and draw short vertical segments above each integer point, with varying lengths based on the parity of the points (longer for odd, shorter for even), connecting each segment's end to a small circle. Label the number line with floating-point numbers from -2 to 2 slightly to the right of each integer point, and connect each integer point to its corresponding floating-point number with a dashed line, creating a clear and organized representation of the number line's scale.
The prompt above was compiled from the original drawing commands and is for reference only.