Subtraction with Integers in a Lift: Find the Final Floor After Moves

Subtraction with Integers in a Lift: Find the Final Floor After Moves
Loading the math board and drawing, please wait…
2025-04-29 01:29
This GeoGebra lesson demonstrates an animated lift scenario where the elevator starts at a given floor and moves up or down by several floors; students then determine the final floor level. The key math ideas are integer addition and subtraction, interpreting positive/negative numbers as up/down directions, and modeling the situation with “start + displacement = end” to select or write the correct

GeoGebra Commands & Parameters

  1. Textfield(input13) → Eingabefeld13
  2. Textfield(input11) → Eingabefeld11
  3. Point(Line[Parkhaus1, xAxis]) → Parkhaus2
  4. Sequence(P0 + (0, (m * heightstock)), m, 0, 7) → textpoints
  5. Translate(textpoints, (widthstock, 0)) → liftpoints
  6. Point(liftpoints) → PLift1
  7. Polygon(PLift1, PLift1 + ((-0.96 * widthlift), 0), PLift1 + ((-0.96 * widthlift), (-0.95 * heightstock)), PLift1 + (0, (-0.95 * heightstock))) → lift, plift1, f, g, h
  8. Textfield(input5) → Eingabefeld5
  9. Textfield(input8) → Eingabefeld8
  10. Textfield(input19) → Eingabefeld19
  11. Textfield(input20) → Eingabefeld20
  12. Textfield(input21) → Eingabefeld21
  13. Textfield(input22) → Eingabefeld22
  14. SelectedIndex(DropDown18) → input18
  15. SelectedIndex(DropDown17) → input17
  16. SelectedIndex(DropDown15) → input15
  17. SelectedIndex(DropDown14) → input14
  18. SelectedIndex(DropDown6) → input6
  19. SelectedIndex(DropDown3) → input3
  20. SelectedIndex(DropDown9) → input9
  21. SelectedIndex(DropDown16) → input16
  22. Element({0, 1, 2, 3, 6, 4, 5}, step) → exnum
  23. Element({1, 4, 1, 8, 5, 2, If[¬correct16, 5, 1]}, exnum + 1) → ausgangsstock
  24. IndexOf(PLift1, liftpoints) → stockindex
  25. If(stockindex > ausgangsstock, Sequence[ausgangsstock, stockindex - 1], {}) → bogerlrunter
  26. If(stockindex < ausgangsstock, Sequence[ausgangsstock - 1, stockindex], {}) → bogerlrauf
  27. Textfield(input2) → Eingabefeld2
  28. Zip(P + (0.45, (-0.2 * heightstock)), P, Sequence[liftpoints(m), m, 1, 8]) → bogerlpoints
  29. Translate(bogerlpoints, (0, (1 * heightstock))) → bogerlpointsunten
  30. Zip(Segment[A, B], A, bogerlpoints, B, bogerlpointsunten) → bogerlall
  31. Join({bogerlrauf, bogerlrunter}) → bogerlnums
  32. KeepIf(IndexOf[m, bogerlall] ∈ bogerlnums, m, bogerlall) → bogerl
  33. Join({Sequence[Segment[Corner[4] + (RasterPixMat * ((k * RasterStepXY), 0)), Corner[4] + (RasterPixMat * ((k * RasterStepXY), RasterMaxY))], k, RasterMaxX / RasterStepXY, RasterMaxX / RasterStepXY], Sequence[Segment[Corner[4] + (RasterPixMat * (0, (k * RasterStepXY))), Corner[4] + (RasterPixMat * (RasterMaxX, (k * RasterStepXY)))], k, RasterMaxY / RasterStepXY, RasterMaxY / RasterStepXY]}) → RasterAussen
  34. Element({correct1, correct4, correct7, correct10, correct12}, exnum) → showgreen
  35. Element({4, 1, 8, 5, 5, 2, 6}, step) → endstock
  36. Zip(Text[(("\textsf\small{" * m) * "}"), P + (0.4, -0.1), true, true, 0], m, {"3", "2", "1", "0", "--1", "--2", "--3", "--4"}, P, textpoints) → textlist
  37. Segment(PStart, PEndOben) → pfeil
  38. Element({correct1, correct4, correct7, correct10, correct12}, exnum) → correctStock