Déplacer le point K sur la demi-droite [AE)
pour le positionner de façon à ce que 
le volume du tétraèdre BDGK, noté p, 
soit  la moitié de celui du cube, noté c,

Piste 1:
Avec un clic droit sur KGB, créer une vue 2D du plan qui contient
la face KGB et observer la nature du triangle KGB
Fermer cette fenêtre et faire de même avec KDG.

A = Point(xAxis)
B = (1, 1, 0)
C = Point(Circle[B, Distance[A, B], Segment[A, B]])
c, D, E, F, G, H, faceABCD, faceADHE, faceABFE, faceBCGF, faceCDHG, faceEFGH, arêteAD, arêteAB, arêteBC, arêteCD, arêteAE, arêteDH, arêteEH, arêteEF, arêteBF, arêteFG, arêteCG, arêteGH = Cube(A, B, C)
b = Ray(A, E)
K = Point(b)
poly1, g, b_1, d = Polygon(B, D, G)
p, faceBDK, KDG, KGB, arêteBK, arêteDK, arêteGK = Pyramid(poly1, K)