Le pavé droit a une base rectangulaire de dimensions 10 sur 6 
et une hauteur variant entre 0 et 12.
Il est surmonté d'une pyramide à base carrée.

A = (0, 0)
B: (x(A) + 5, y(A))
C: (x(B) + 1, y(B) + 2)
a = Segment(A, B)
b = Segment(B, C)
c = Line(C, a)
d = Line(A, b)
D = Intersect(c, d)
e = Segment(A, D)
f = Segment(D, C)
E: (x(A), 6)
g = Segment(A, E)
M = Point(g)
h = OrthogonalLine(B, a)
i = OrthogonalLine(C, a)
j = OrthogonalLine(D, a)
k = Line(M, e)
F = Intersect(j, k)
l = Line(M, a)
m = Line(F, a)
G = Intersect(h, l)
H = Intersect(i, m)
n = Segment(A, M)
p = Segment(D, F)
q = Segment(B, G)
r = Segment(C, H)
s = Segment(D, B)
t = Segment(A, C)
I = Intersect(s, t)
J: (x(I), y(I) + 6)
a1 = Segment(F, J)
b1 = Segment(J, H)
c1 = Segment(J, G)
d1 = Segment(J, M)
e1 = Segment(J, I)
f1 = Segment(M, G)
g1 = Segment(G, H)
h1 = Segment(F, G)
i1 = Segment(M, H)
k1 = Segment(F, H)
j1 = Segment(M, F)
l1 = Segment(F, H)
O = Intersect(h1, i1)
text2: "Volume 1 =" + (10 * 6 Distance[O, I] 2)
text3: "OI = " + (Distance[O, I] 2)
text4: "Volume 2 =" + (10 * 6 * (12 - 2 Distance[O, I]) / 3)
AffichageVolumes = 0 (slider from 0 to 1, step 1)
poly1, m_1, g_1, h_1, f_1 = Polygon(M, G, H, F)
AffichageHauteur = 0 (slider from 0 to 1, step 1)