$\text{Überprüfen}$

$\text{Neuer Versuch}$

$\text{Neue Aufgabe}$

No selection allowed for all input boxes

Selection allowed for all input boxes

\text{Berechne den Quotienten.}

Fix position and allow selection for all text objects

Empty all input boxes

#EDEDED

\text{Text for just the correct answer.}

\underline\text{Helper scripts for template}

\underline\text{Helper scripts for authors}

$a=$

$b=$

\textsf\colorbox{ebe7f8}{This hint is for typical misconceptions of\students. It is shown after any wrong answer\that shows the typical error.}

\textsf{\frac{\phantom{hhhh}}{}}

testBtnNew

\textsf{Lösung:}

\textsf{\infin}

aInput = NaN
bInput = NaN
questionCount = 1 (slider from 1 to 100, step 1)
randomB = Shuffle(Sequence[RandomElement[{2, 3, 4, 5, 6, 7, 8}], i, 1, 100])
start: 1
numb = If(start ≟ 1, 9, start ≟ 2, 5, Element[randomB, Mod[questionCount, 100] + 1])
randomA = Shuffle(Sequence[RandomElement[{4, 6, 8, 9, 10}], i, 1, 100])
numa = If(start ≟ 1, 8, start ≟ 2, 6, Element[randomA, Mod[questionCount, 100] + 1])
teilerFromA = DivisorsList(numa)
Factors(numa)
teilerFromAWithoutItself = Remove(teilerFromA, Last[teilerFromA])
teilerFromAWithoutItselfAndOne = Remove(teilerFromAWithoutItself, First[teilerFromAWithoutItself])
numc = If(teilerFromAWithoutItselfAndOne ≟ {}, RandomElement[{numa - 3, numa - 2, numa - 1}], RandomElement[teilerFromAWithoutItselfAndOne])
numZw: numa / numc
solution: numa / numc / numb
zählerGekürzt = Numerator(solution)
correct1: aInput ≟ numa / numc ∨ aInput ≟ zählerGekürzt
nennerGekürzt = Denominator(solution)
correct2: bInput ≟ numb ∨ bInput ≟ nennerGekürzt
N: (-0.5, -1)
M = (-1.5, -1)
u = Vector(M, N)
rects = If(numb ≟ 5, (-numb) - 1, If[numb ≟ 4, (-numb) - 3, If[numb ≟ 3, (-numb) - 5, If[numb ≟ 2, (-numb) - 7, If[numb ≟ 6, (-numb) + 1, If[numb ≟ 7, (-numb) + 3, If[numb ≟ 8, (-numb) + 5, If[numb ≟ 9, (-numb) + 7]]]]]]])
randomC = DivisorsList(numa)
Factors(numa)
randomCWithoutTrivials = Remove(randomC, {1})
vielfacheVonNumC = Sequence((i * numc), i, 1, 100)
Blue = (-5.32, 4.5)
Green = (-5.28, 3.68)
Orange = (-5.2, 2.86)
Red = (-5.32, 2.04)
Purple = (-5.34, 1.12)
Gray = (-5.34, 0.32)
GrayDark = (-5.36, -0.7)
validate = false
showanswer = false
showsolution = false
attemptCount = 0
correctCount: 0
textCountCorrect: "\text{Richtig gelöste Aufgaben: " + (LaTeX[correctCount]) + " }"
showButtonNew = false
showButtonTryAgain = false
showButtonValidate = true
showhint = false
InputBox1 = Textfield(aInput)
InputBox2 = Textfield(bInput)
correct: correct1 ∧ correct2 ∧ aInput / bInput ≟ solution ∨ aInput / bInput ≟ solution
showcorrecttext = false
PtopLeftCornerFeedback = (-2.938291342564219, 8.129557239939874)
PbottomRightCornerFeedback = (-2.404451051079224, 6.286689833684774)
PtopRightCornerFeedback: (x(PbottomRightCornerFeedback), y(PtopLeftCornerFeedback))
PbottomLeftCornerFeedback: (x(PtopLeftCornerFeedback), y(PbottomRightCornerFeedback))
rectangleCorrect, ptopleftcornerfeedback, ptoprightcornerfeedback, pbottomrightcornerfeedback, pbottomleftcornerfeedback = Polygon(PtopLeftCornerFeedback, PtopRightCornerFeedback, PbottomRightCornerFeedback, PbottomLeftCornerFeedback)
showhinttypicalerror = false
allowCountIncrement = true
stayX = Append(true, Sequence[If[randomA(i) ≟ randomA(i - 1), false, true], i, 2, 100])
stayY = Append(true, Sequence[If[randomB(i) ≟ randomB(i - 1), false, true], i, 2, 100])
randomNosForXwithoutRepeat = Remove(Sequence[If[stayX(i), randomA(i), 0], i, 1, 100], Sequence[0, i, 1, 100])
randomNosForYwithoutRepeat = Remove(Sequence[If[stayY(i), randomB(i), 0], i, 1, 100], Sequence[0, i, 1, 100])
numXwithoutRepeat = Element(randomNosForXwithoutRepeat, Mod[questionCount, Length[randomNosForXwithoutRepeat]] + 1)
numYwithoutRepeat = Element(randomNosForYwithoutRepeat, Mod[questionCount, Length[randomNosForYwithoutRepeat]] + 1)
fixed = Defined((aInput * bInput))
isTypicalError: false
f: y = 1
gl1: x = 2.5
Text1: "\textsf{\frac{" + (LaTeX[numa]) + "}{" + (LaTeX[numb]) + "} : " + (LaTeX[numc]) + " =}"
PtopLeftCornerFeedback_{1} = (-2.939399036188274, 7.146801493852283)
PbottomRightCornerFeedback_{1} = (-2.394748302298168, 6.319485124564741)
PtopRightCornerFeedback_{1}: (x(PbottomRightCornerFeedback_{1}), y(PtopLeftCornerFeedback_{1}))
PbottomLeftCornerFeedback_{1}: (x(PtopLeftCornerFeedback_{1}), y(PbottomRightCornerFeedback_{1}))
rectangleCorrect_{1}, ptopleftcornerfeedback_{1}, ptoprightcornerfeedback_{1}, pbottomrightcornerfeedback_{1}, pbottomleftcornerfeedback_{1} = Polygon(PtopLeftCornerFeedback_{1}, PtopRightCornerFeedback_{1}, PbottomRightCornerFeedback_{1}, PbottomLeftCornerFeedback_{1})
smaller4: numa / numb
A = (-1, 6)
B = (0, 6)
C = (0, 4)
D = (-1, 4)
v1, a, b, c, d = Polygon(A, B, C, D)
E = (1, 6)
F = (2, 6)
G = (2, 4)
H = (1, 4)
v2, e, f_1, g, h = Polygon(E, F, G, H)
I = (3, 6)
J = (4, 6)
K = (4, 4)
L = (3, 4)
v3, i, j, k, l = Polygon(I, J, K, L)
sequenceQuadrats = Translate(Sequence[Sequence[Polygon[(i, j), (i + 0.1, j), (i + 0.1, j + 1.5), (i, j + 1.5)], j, 3.5, 3.5], i, -1, rects / 10, 0.1], Vector[(-3 * u)])
sequenceQuadrats' = Translate(sequenceQuadrats, u)
sequenceQuadrats'_{1} = Translate(sequenceQuadrats, Vector[(2 * u)])
case3Step1_1 = Translate(sequenceQuadrats, u)
up: numa / numc
down: numb
ggT = GCD(up, down)
randomForTeiler = Shuffle(Sequence[Random[0, 10], i, 1, 100])
hintText: "\textsf\colorbox{ebe7f8}{Nutze " + (LaTeX[If[numa > numb, "die Abbildung", "die Abbildung"]]) + ", um den Quotienten zu bestimmen.}"
case3Step1 = Translate(Sequence[Sequence[Polygon[(i, j), (i + 0.1, j), (i + 0.1, j + 2), (i, j + 2)], j, 4, 4], i, -1, rects / 10, 0.1], Vector[(-3 * u)])
correctText: "\text{" + (LaTeX[If[(¬correct) ∧ (correct1 ∨ correct2), "✘ Falsch", If[correct, "✓ Richtig", "✘ Falsch"]]]) + "}"
specificHint: "\textsf\colorbox{235, 231, 248}{Dividiere nur den Zähler durch " + (LaTeX[numc]) + ".\\Der Nenner bleibt unverändert.}"
case1Step1 = Sequence(Sequence[Polygon[(i, j), (i + 0.1, j), (i + 0.1, j + 1.5), (i, j + 1.5)], j, 3.5, 3.5], i, -4, -4 + (0.1 * numa) - 0.1, 0.1)
case1Step2 = Sequence(Sequence[Polygon[(i, j), (i + 0.1, j), (i + 0.1, j + 1.5), (i, j + 1.5)], j, 3.5, 3.5], i, -4, -4 + (0.1 * numa / numc) - 0.1, 0.1)
case2Step1 = Translate(Sequence[Sequence[Polygon[(i, j), (i + 0.1, j), (i + 0.1, j + 1.5), (i, j + 1.5)], j, 3.5, 3.5], i, -1, rects / 10, 0.1], Vector[(-3 * u)])
case2Step2 = Sequence(Sequence[Polygon[(i, j), (i + 0.1, j), (i + 0.1, j + 1.5), (i, j + 1.5)], j, 3.5, 3.5], i, -4, -4 + (0.1 * numa / numc) - 0.1, 0.1)
case2Step1_1 = Translate(Sequence[Sequence[Polygon[(i, j), (i + 0.1, j), (i + 0.1, j + 1.5), (i, j + 1.5)], j, 3.5, 3.5], i, 0, (0.1 * (numa - numb)) - 0.1, 0.1], Vector[(-3 * u)])
solutionText_{1}: "\text{\\\\
\frac{" + (LaTeX[numa]) + "}{" + (LaTeX[numb]) + "} : " + (LaTeX[numc]) + " = \frac{" + (LaTeX[numa]) + " : " + (LaTeX[numc]) + "}{" + (LaTeX[numb]) + "} = \frac{ " + (LaTeX[numa / numc]) + " }{" + (LaTeX[numb]) + "} " + (LaTeX[If[ggT ≠ 1, "=", ""]]) + " " + (LaTeX[If[ggT ≠ 1, FractionText[solution], ""]]) + " "