x

Partage fraction 1

=

Résultat

Partage fraction 2

Prendre fraction 1

Prendre fraction 2

a = 5
b = 6
c = 7
d = 8
r = 2
ChampTexte1 = Textfield(a)
ChampTexte2 = Textfield(b)
ChampTexte3 = Textfield(c)
ChampTexte4 = Textfield(d)
p1: 1
p2: 1
m = false
G = (-4.503760200000003, 8.052603600000014)
H = (-2.8537602000000017, 8.030603600000013)
n = Segment(G, H)
I = (1.2288317843478833, 8.096580797403137)
J = (3.0731635486838296, 8.096580797403137)
p = Segment(I, J)
pp: (p * p)
o = false
A = (-7.350419344136181, 5.58911851105876)
f = Line(A, y = 0)
B = Point(f)
g = OrthogonalLine(A, f)
C = Point(g)
h = OrthogonalLine(C, g)
i = OrthogonalLine(B, f)
D = Intersect(h, i)
liste1 = Sequence((x(C), (t * y(A)) + ((1 - t) * y(C))), t, 0, 1, 1 / b)
liste2 = Sequence(((t * x(B)) + ((1 - t) * x(A)), y(A)), t, 0, 1, 1 / d)
liste3 = Sequence(Line[Element[liste1, t], y = 0], t, 1, b + 1)
texte3: "\frac{" + (LaTeX[(a * c)]) + "}{" + (LaTeX[(b * d)]) + "}"
liste4 = Sequence(Line[Element[liste2, t], x = 0], t, 1, d + 1)
liste5 = Sequence(Sequence[((t * x(D)) + ((1 - t) * x(C)), (u * y(A)) + ((1 - u) * y(C))), t, 0, 1, 1 / d], u, 0, 1, 1 / b)
j = Segment(A, B)
k = Segment(A, C)
liste7 = Sequence(Segment[Translate[A, Vector[(t / d * Vector[A, B])]], Translate[C, Vector[(t / d * Vector[A, B])]]], t, 0, d)
liste8 = Element(liste5, 1)
liste9 = Sequence(Sequence[Polygon[Element[Element[liste5, t], u], Element[Element[liste5, t], u + 1], Element[Element[liste5, t + 1], u + 1], Element[Element[liste5, t + 1], u]], t, 1, a], u, 1, c)
liste10 = Sequence(Sequence[Polygon[Element[Element[liste5, t], u], Element[Element[liste5, t], u + 1], Element[Element[liste5, t + 1], u + 1], Element[Element[liste5, t + 1], u]], t, 1, b], u, 1, d)
l = Segment(C, D)
liste11 = Sequence(Polygon[Element[Element[liste5, 1], t], Element[Element[liste5, 1], t + 1], Element[Element[liste5, b + 1], t + 1], Element[Element[liste5, b + 1], t]], t, 1, c)
liste6 = Sequence(Segment[Translate[A, Vector[(t / b * Vector[A, C])]], Translate[B, Vector[(t / b * Vector[A, C])]]], t, 0, b)
q = Segment(D, B)
s = false
t = false
u = false