frazioni in movimento plus

parti:

area cerchio

area settore circolare

parti

______

parti

Totale =

=

=

scrivere in quante parti dividere l'unità

cliccare sulle torte per aumentare la frazione

Unità Mobile

Parti:

passo3 = 1 (slider from 1 to d + 1, step 1)
d = 3 (slider from 1 to 120, step 1)
C3 = Point(xAxis)
C1 = Intersect(xAxis, yAxis)
traslazioneC1C3 = Vector(C1, C3)
alpha: (360 * ° / d)
listaPuntiC1 = Append(Sequence[(x(C1) + (3 * cos((alpha * i))), y(C1) + (3 * sin((alpha * i)))), i, 0, d - 1], (x(C1) + (3 * cos((-0.01))), y(C1) + (3 * sin((-0.01)))))
listaPuntiC3 = Translate(listaPuntiC1, traslazioneC1C3)
passo2 = 1 (slider from 1 to d + 1, step 1)
C2 = Point(xAxis)
traslazioneC1C2 = Vector(C1, C2)
listaPuntiC2 = Translate(listaPuntiC1, traslazioneC1C2)
passo1 = 2 (slider from 1 to d + 1, step 1)
passo4 = 4 (slider from 1 to den2 + 1, step 1)
C4 = (21.038870237594455, -0.03827336298887942)
den2 = 8 (slider from 1 to 120, step 1)
beta_1: (360 * ° / den2)
listaPuntiC4 = Append(Sequence[(x(C4) + (3 * cos((beta_1 * i))), y(C4) + (3 * sin((beta_1 * i)))), i, 0, den2 - 1], (x(C4) + (3 * cos((-0.01))), y(C4) + (3 * sin((-0.01)))))
circ1 = Circle(C1, 3)
campoInserimento1 = Textfield(d)
areaCerchi = Area(circ1)
Puntoc = PointIn(circ1)
sett1 = CircleSector(C1, Element[listaPuntiC1, 1], Element[listaPuntiC1, passo1])
aSett1 = Area(sett1)
Puntod1 = PointIn(sett1)
num1: round((d * aSett1 / areaCerchi))
M = Point(xAxis)
circ2 = Circle(C2, M)
M' = Rotate(M, alpha, C2)
sett2 = CircleSector(C2, Element[listaPuntiC2, 1], Element[listaPuntiC2, passo2])
W = Point(xAxis)
circ3 = Circle(C3, W)
W' = Rotate(W, alpha, C3)
sett3 = CircleSector(C3, Element[listaPuntiC3, 1], Element[listaPuntiC3, passo3])
campoInserimento1_1 = Textfield(d)
campoInserimento1_2 = Textfield(d)
aSett2 = Area(sett2)
Testoh2: "Area di " + (Name[sett2]) + " = " + aSett2
Puntoh2 = PointIn(sett2)
num2: round((d * aSett2 / areaCerchi))
aSett3 = Area(sett3)
Testop3: "Area di " + (Name[sett3]) + " = " + aSett3
Puntop3 = PointIn(sett3)
num3: round((d * aSett3 / areaCerchi))
tot: num1 + num2 + num3
valDecimale: "" + (tot / d) + ""
decimal: tot / d
valPerc: "" + ((decimal * 100)) + "%"
circ4 = Circle(C4, 3)
sett4 = CircleSector(C4, Element[listaPuntiC4, 1], Element[listaPuntiC4, passo4])
campoInserimento3 = Textfield(den2)
frac2: "\frac{" + (LaTeX[num2]) + "}{" + (LaTeX[d]) + "}"
frac1_1: "\frac{" + (LaTeX[num1]) + "}{" + (LaTeX[d]) + "}"
frac3: "\frac{" + (LaTeX[num3]) + "}{" + (LaTeX[d]) + "}"
testo2_1: "\frac{" + (LaTeX[tot]) + "}{" + (LaTeX[d]) + "}"
aSett4 = Area(sett4)
Testosett4: "Area di " + (Name[sett4]) + " = " + aSett4
Puntosett4 = PointIn(sett4)
num4: round((den2 * aSett4 / areaCerchi))
frac4: "\frac{" + (LaTeX[num4]) + "}{" + (LaTeX[den2]) + "}"
listaSegmentiC1 = Sequence(Segment[C1, Element[listaPuntiC1, i]], i, 1, d)
listaSegmentiC2 = Translate(listaSegmentiC1, traslazioneC1C2)
listaSegmentiC3 = Translate(listaSegmentiC1, traslazioneC1C3)
listaSegmentiC4 = Sequence(Segment[C4, Element[listaPuntiC4, i]], i, 1, den2)