A = (3, -1, 0)
B = (3, 3, 0)
C = (-1, 3, 0)
D = (-1, -1, 0)
v = (0, 0, 6)
E: A + v
F: B + v
G: C + v
H: D + v
e, I, J, K, FlächeABIE, FlächeBCJI, FlächeCDKJ, FlächeADKE, FlächeEIJK, KanteAE, KanteBI, KanteCJ, KanteDK, KanteEI, KanteIJ, KanteJK, KanteEK = Prism(Polygon[A, B, C, D], E)
Vieleck1, a, b, c, d = Polygon(B, C, H, E)
L = Point(e)