n

Écris le nombre de sommets, de faces
 et d'arêtes en fonctions de n.

S=

F=

A=

valider

valider

valider

a = 5 (slider from 3 to 20, step 1)
L_{1} = Sequence(Rotate[(0, 3, 0), ((2 * i) * π / a)], i, 1, a)
L_2: Sequence[Rotate[(0, 3, 0), ((2 * i) * π / a) + π / a], i, 1, a] + (0, 0, 4)
Base_1 = Polygon(L_{1})
Base_2 = Polygon(L_2)
L_3 = Sequence(Polygon[Element[L_2, i], Element[L_{1}, i + 1], Element[L_2, i + 1], Element[L_2, i]], i, 1, a - 1)
poly1, f, g, h, i = Polygon(Element[L_2, a], Element[L_{1}, 1], Element[L_2, 1], Element[L_2, a])
L_4 = Insert(poly1, L_3, a)
L_5 = Sequence(Polygon[Element[L_{1}, i], Element[L_{1}, i + 1], Element[L_2, i], Element[L_{1}, i]], i, 1, a - 1)
poly2, j, k, l, m = Polygon(Element[L_{1}, a], Element[L_{1}, 1], Element[L_2, a], Element[L_{1}, a])
L_6 = Insert(poly2, L_5, a)
sommets(n) = (2 * n)
faces(n) = (2 * n) + 2
aretes(n) = (4 * n)
nulle(n) = 0
rep1(n) = 0
rep2(n) = 0
rep3(n) = 0
ChampTexte1 = Textfield(rep1)
ChampTexte2 = Textfield(rep2)
ChampTexte3 = Textfield(rep3)