Noms des variables : 
x1=Distance[A, E]
V=(Distance[A, B] - 2 x1) (Distance[A, C] - 2 x1) x1

Affichage du volume de la boîte

Infos

Affichage des longueurs

A = Intersect(xAxis, yAxis)
B = Point(xAxis)
e = Segment(A, B)
M1 = Midpoint(e)
a = Line(A, B)
b = OrthogonalLine(A, a)
C = Point(b)
M2 = Midpoint(A, C)
d1 = Circle(A, Min[Distance[A, M1], Distance[A, M2]])
B1 = Intersect(d1, e)
d = OrthogonalLine(B, a)
c = OrthogonalLine(C, b)
D = Intersect(c, d)
f = Segment(A, B1)
E = Point(f)
g = Circle(A, E)
F = Intersect(g, b, 2)
k = Circle(D, Distance[A, E])
h = Circle(B, Distance[A, E])
p = Circle(C, Distance[A, E])
G = Intersect(p, b, 1)
I = Intersect(h, e, 1)
K = Intersect(k, d, 1)
H = Intersect(p, c, 1)
i = OrthogonalLine(H, c)
j = OrthogonalLine(G, b)
l = OrthogonalLine(F, b)
N = Intersect(k, c, 1)
m = OrthogonalLine(N, c)
O = Intersect(i, j)
P = Intersect(i, l)
Q = Intersect(l, m)
R = Intersect(j, m)
L = Intersect(h, d, 1)
poly1, e_1, i_1, q, l_1, k_1, r, n, h_1, o, g_1, f_1, p_1 = Polygon(E, I, Q, L, K, R, N, H, O, G, F, P)
distanceRK = Distance(R, K)
s = Distance(R, K)
distanceAE = Distance(A, E)
t = Segment(A, C)
a1 = Segment(C, D)
b1 = Segment(D, B)
c1 = Segment(P, Q)
e1 = Segment(P, O)
f1 = Segment(O, R)
g1 = Segment(R, Q)
x1 = Distance(A, E)
V: (Distance[A, B] - 2 x1) * (Distance[A, C] - 2 x1) x1
text1: "Volume de la boîte : " + V + " cm³"
J = Point(i)
h1 = OrthogonalLine(J, i)
k1 = Circle(J, Distance[P, O] sqrt(2) / 2)
M = Intersect(m, h1)
M' = Rotate(M, 45°, J)
α = Angle(M, J, M')
i1 = Line(J, M')
j1 = Line(M, i1)
S = Intersect(k1, i1, 2)
l1 = Line(S, h1)
T = Intersect(j1, l1)
p1 = Circle(M, x1)
q1 = Circle(T, x1)
r1 = Circle(J, x1)
s1 = Circle(S, x1)
U = Intersect(s1, l1, 1)
D1 = Intersect(q1, l1, 2)
W = Intersect(p1, h1, 2)
Z = Intersect(r1, h1, 1)
pliage = 0 rad (slider from 0 to 1.5707963267948966, step 0.017453292519943295)
D1' = Rotate(D1, 45 ° + pliage / 2, T)
γ = Angle(D1, T, D1')
E1 = Dilate(Rotate[W, -135 ° - pliage 3 / 2, M], cos(45 ° - pliage / 2), M)
A1 = Dilate(Rotate[D1, 45 ° + pliage / 2, T], cos(45 ° - pliage / 2), T)
D1'_1 = Rotate(D1, pliage, T)
W' = Rotate(W, pliage, M)
poly2, m_1, w', d1'_1, t_1 = Polygon(M, W', D1'_1, T)
C1 = Dilate(Rotate[Z, 45 ° - pliage 3 / 2, J], cos(45 ° - pliage / 2), J)
poly3, m_2, j_1, c1_1, e1_1 = Polygon(M, J, C1, E1)
F1 = Dilate(Rotate[U, -135 ° + pliage / 2, S], cos(45 ° - pliage / 2), S)
poly4, t_2, a1_1, f1_1, s_1 = Polygon(T, A1, F1, S)
Z' = Rotate(Z, -pliage, J)
U' = Rotate(U, -pliage, S)
poly5, s_2, u', z', j_2 = Polygon(S, U', Z', J)
poly6, m_3, t_3, s_3, j_3 = Polygon(M, T, S, J)
u = true
v = false
text3: "Longueur du rectangle de départ : " + (Distance[A, B]) + " cm" + "
Largueur du rectangle de départ : " + (Distance[A, C]) + " cm" + "

Longueur du côté du carré enlevé : " + x1 + " cm"
w = true