Solve One-Step Equations by Multiplying or Dividing

GeoGebra Commands & Parameters

1. Random(1, 4) → m
2. UnicodeToLetter(10007) → xmark
3. UnicodeToLetter(10003) → cmark
4. If(m ≟ 1 ∨ m ≟ 2, Random[2, 4], 2) → leftOperand
5. Polygon(A, leftScaleRegionCorner, C, D) → leftScaleRegion, a, b, c, d
6. Polygon(I, rightScaleRegionCorner, K, L) → rightScaleRegion, i, j, k, l
7. Join({Sequence[C + ((-1.8 * i), 0), i, 1, Min[numWeightsLeft, 4]], Sequence[C + ((-1.8 * i), 1.5), i, 1, Min[numWeightsLeft - 4, 4]]}) → leftRegionWeightCorners
8. Join({Sequence[K + ((-1.8 * i), 0), i, 1, Min[numWeightsRight, 4]], Sequence[K + ((-1.8 * i), 1.5), i, 1, Min[numWeightsRight - 4, 4]]}) → rightRegionWeightCorners
9. Join({Sequence[leftScaleRegionCorner + (-1.5, 0) + ((2 * i), 0), i, 0, Min[numBagsLeft, 2] - 1], Sequence[leftScaleRegionCorner + (-1.5, 0) + ((2 * i), 2.5), i, 0, Min[numBagsLeft - 2, 2] - 1]}) → leftRegionBagCorners
10. Join({Sequence[rightScaleRegionCorner + (-1.5, 0) + ((2 * i), 0), i, 0, Min[numBagsRight, 2] - 1], Sequence[rightScaleRegionCorner + (-1.5, 0) + ((2 * i), 2.5), i, 0, Min[numBagsRight - 2, 2] - 1]}) → rightRegionBagCorners
11. LaTeX("\text{\textbf{Instructions: }Use the buttons on either side of the scale to add and remove bags and\\weights. Start by representing the given equation. Then, try to isolate a bag on one\\side of the scale while keeping the scale balanced.}") → SpecInstruc
12. Textfield(answerText) → answerBox
13. LaTeX("\text{The weight of the money bag is }m=") → answerLine
14. LaTeX("\text{\textbf{Question: }What is the weight of the money bag?}") → MainInstruc
15. LaTeX("\text{Please enter the weight of the money bag.}") → remember