快速十位相加

GeoGebra 命令及参数

1. Sequence(Sequence[(x(A) + (i * horizontalspacing), y(A) + (j * verticalspacing)), j, 0, verticaldots - 1], i, 0, horizontaldots - 1) → destinationarraydotsbig
2. Flatten(destinationarraydotsbig) → destinationonesflat
3. Textfield(firsttext) → InputBox1
4. Textfield(secondtext) → InputBox2
5. Mod(firstnumber, 10) → firstones
6. Mod(secondnumber, 10) → secondones
7. Sequence(Sequence[(x(B) + (i * smallhorizontalspacing), y(B) + (j * smallverticalspacing)), j, 0, smallverticaldots - 1], i, 0, smallhorizontaldots - 1) → smallarrayfirstbig
8. Sequence(Sequence[(x(C) + (i * smallhorizontalspacing), y(C) + (j * smallverticalspacing)), j, 0, smallverticaldots - 1], i, 0, smallhorizontaldots - 1) → smallarraysecondbig
9. Flatten(smallarrayfirstbig) → smallonesfirstflat
10. Flatten(smallarraysecondbig) → smallonessecondflat
11. Sequence(Element[smallonesfirstflat, i], i, 1, firstones) → showfirstones
12. Sequence(Element[smallonessecondflat, i], i, 1, secondones) → showsecondones
13. Sequence(Sequence[(x(D) - (i * smalltenswidth), y(D) + (j * smalltensheight)), j, 0, smalltensrows - 1], i, 0, smalltenscolumns - 1) → smalltensfirstbig
14. Sequence(Sequence[(x(E) - (i * smalltenswidth), y(E) + (j * smalltensheight)), j, 0, smalltensrows - 1], i, 0, smalltenscolumns - 1) → smalltenssecondbig
15. Flatten(smalltensfirstbig) → smalltensfirstflat
16. Flatten(smalltenssecondbig) → smalltenssecondflat
17. Sequence(Segment[Element[smalltensfirstflat, (2 * i) + 1], Element[smalltensfirstflat, (2 * i) + 2]], i, 0, firsttens - 1) → showfirsttens
18. Sequence(Segment[Element[smalltenssecondflat, (2 * i) + 1], Element[smalltenssecondflat, (2 * i) + 2]], i, 0, secondtens - 1) → showsecondtens
19. Flatten(Sequence[Sequence[(x(F) - (i * destinationtenswidth), y(F) + (j * destinationtensheight)), i, 0, destinationtenscolumns - 1], j, 0, destinationtensrows - 1]) → destinationtensflat
20. Sequence(Translate[Element[showfirstones, i], Vector[(Vector[Element[smallonesfirstflat, i], Element[destinationonesflat, i]] * slideit)]], i, 1, firstones) → swooponesfirst
21. Sequence(Translate[Element[showsecondones, i], Vector[(Vector[Element[smallonessecondflat, i], Element[destinationonesflat, i + firstones]] * slideit)]], i, 1, secondones) → swooponessecond
22. Segment(G, H) → f
23. Segment(I, J) → g
24. Mod(total, 10) → totalones
25. Mod(total, 10) → finalones
26. Segment(Element[destinationonesflat, 1], Element[destinationonesflat, (10 * regroupit)]) → h
27. Segment(K, L) → i
28. Segment(M, N) → j
29. Sequence(Vector[Element[smalltensfirstflat, (2 * i)], Element[destinationtensflat, i]], i, 1, firsttens) → slidefirsttensvectors
30. Sequence(Vector[Element[smalltenssecondflat, (2 * i)], Element[destinationtensflat, i + firsttens]], i, 1, secondtens) → slidesecondtensvectors
31. Sequence(Translate[Element[showfirsttens, i], Vector[(Element[slidefirsttensvectors, i] * slideit)]], i, 1, firsttens) → swooptensfirst
32. Sequence(Translate[Element[showsecondtens, i], Vector[(Element[slidesecondtensvectors, i] * slideit)]], i, 1, secondtens) → swooptenssecond