Interactive Fraction Multiplication Demo

Interactive Fraction Multiplication Demo
Loading the math board and drawing, please wait…
2018-09-02 12:12
This GeoGebra worksheet demonstrates the operation and geometric interpretation of fraction multiplication. The core mathematical concepts include fraction multiplication rules, visual representation of products through area models, and simplification of results. Construction highlights: Textfield and InputBox components create an interactive interface where users can input two fractions and instantly see the product; Point and Polygon commands are used to draw geometric representations (such as rectangular area models) to visually demonstrate the 'numerator times numerator, denominator times denominator' rule; Sequence and Intersection commands enable dynamic demonstration effects. This example is suitable for upper elementary to middle school students learning fraction multiplication, ideal for classroom demonstration or student self-directed exploration.

GeoGebra Commands & Parameters

  1. Point({1 - mover, 0}) → f2Point
  2. Point({-1 + mover, 0}) → f1Point
  3. Polygon(f1Point, f1Point + (f1, 0), f1Point + (f1, 1), f1Point + (0, 1)) → f1poly, f1point, n, p, q
  4. Polygon(f2Point, E, G, H) → poly3, f2point, e, g_1, h_1
  5. Textfield(f1Text) → InputBox1
  6. Textfield(f2Text) → InputBox2
  7. IndexOf(47, TextToUnicode[f1Text]) → slash1
  8. IndexOf(47, TextToUnicode[f2Text]) → slash2
  9. Take(f1Text, slash1 + 1) → D1Text
  10. Polygon(f1Point, f1Point + (1, 0), 4) → poly1, f, g, h, i, A, B
  11. Polygon(f2Point, f2Point + (1, 0), 4) → poly2, j, k, l, m, C, D
  12. Take(f2Text, slash2 + 1) → D2Text
  13. Sequence(Segment[f1Point + (i / D1, 0), f1Point + (i / D1, 1)], i, 1, D1 - 1) → f1Bars
  14. Sequence(Segment[f2Point + (0, i / D2), f2Point + (1, i / D2)], i, 1, D2 - 1) → f2Bars
  15. Polygon(f2Point, f2Point + (0, f2), f2Point + (1, f2), f2Point + (1, 0)) → f2poly, r, s, t, a
  16. RemoveUndefined(Sequence[If[pN / i ≟ floor(pN / i), i], i, 1, pN]) → Nfactors
  17. RemoveUndefined(Sequence[If[pD / i ≟ floor(pD / i), i], i, 1, pD]) → Dfactors
  18. Intersection(Nfactors, Dfactors) → factors