x

Modifier x à l'aide du curseur

Cliquer ici pour afficher L(x)

Cliquer ici pour afficher le graphique.

Modifier x pour  tracer point par point 
la courbe représentative de L. 

x

x

y

a = 10 (slider from 10 to 180, step 0.5)
b: 1800.0 / a
A = (-11, 0)
D: (-(11.0) + b / 20.0, 0.0)
B: (-(11.0), a / 20.0)
C: (-(11.0) + b / 20.0, a / 20.0)
poly1, a_1, d, c, b_1 = Polygon(A, D, C, B)
G = (-1, -3)
H = (-12, -3)
E = (-12, 0)
F = (-1, 0)
poly2, e, f, g, h = Polygon(E, F, G, H)
I = Point(yAxis)
J = Point(yAxis)
u = Vector(I, J)
K = Point(xAxis)
R = Point(xAxis)
v = Vector(K, R)
O = Intersect(Segment[K, R], Segment[I, J])
L: 2.0 * a + 1800.0 / a
texte1: "Aire = " + (a * b)
texte2: "L(x) = " + L
texte3: "x = " + a
texte4: "y = " + b
M: (a / 20.0, L / 40.0)
i = OrthogonalLine(M, v)
j = OrthogonalLine(M, u)
M1 = Intersect(i, Line[O, R])
M2 = Intersect(j, Line[I, J])
k = Segment(M2, M)
l = Segment(M, M1)
texte5: "x=" + a
texte6: "L(x)=" + L
m = false
n = false
N = Midpoint(A, B)
P = Midpoint(B, C)
Q = Midpoint(C, D)