A = (3, -1, 0)
B = (3, 3, 0)
C = (-1, 3, 0)
D = (-1, -1, 0)
S = (1, 1, 6)
A_1: (A + (A + S) / 2) / 2
B_1: (B + (B + S) / 2) / 2
C_1: (C + S) / 2
D_1: (D + S) / 2
Vieleck1, a_1, b_1, c_1, d_1 = Polygon(A_1, B_1, C_1, D_1)
a, FlächeABS, FlächeBCS, FlächeCDS, FlächeADS, KanteAS, KanteBS, KanteCS, KanteDS = Pyramid(Polygon[A, B, C, D], S)