/home/stephan/Bureau/03. Visualiser des solides (avec des variables)/croix2

n

n

Volume

Aléatoire

(Ctrl+R)

Variable

n

Pour chaque valeur
de n, détermine le
volume du solide et
inscris tes réponses 
dans le tableur.

Pour la dernière ligne,
on attend une 
expression algébrique
avec la variable n.

a = 4 (slider from 1 to 20, step 1)
Aire(n) = 0
Volume(n) = (6 * (n - 1)) + 1
A2: 1
A3: 2
A4: 3
A5: 4
A6: 5
A7: 6
A8: 7
A9: 8
A10: 9
A11: 10
A12: 100
A14 = Random(150, 250)
Réponse1: Volume
Réponse2: Aire
Formule1(n) = (6 * n)
Formule2(n) = (4 * n) + 2
R: (((-((2 * a) - 1))) / 2, ((-((2 * a) - 1))) / 2, ((-((2 * a) - 1))) / 2)
tmp: Réponse1(4)
m1, l1, l2 = pavé(R + (0, a - 1, a - 1), (2 * a) - 1, 1, 1)
m2, l3, l4 = pavé(R + (a - 1, 0, a - 1), 1, (2 * a) - 1, 1)
m3, l5, l6 = pavé(R + (a - 1, a - 1, 0), 1, 1, (2 * a) - 1)

Tool: pavé
Input: R, c_x, c_y, c_z
Output: L_{segment}, L_{point}, L_{polygones}

S_1 = Sequence({Segment[R + (i, 0, 0), R + (i, c_y, 0)], Segment[R + (i, c_y, 0), R + (i, c_y, c_z)], Segment[R + (i, c_y, c_z), R + (i, 0, c_z)], Segment[R + (i, 0, c_z), R + (i, 0, 0)]}, i, 0, c_x, 1)
S_2 = Sequence({Segment[R + (0, i, 0), R + (c_x, i, 0)], Segment[R + (c_x, i, 0), R + (c_x, i, c_z)], Segment[R + (c_x, i, c_z), R + (0, i, c_z)], Segment[R + (0, i, c_z), R + (0, i, 0)]}, i, 0, c_y, 1)
S_3 = Sequence({Segment[R + (0, 0, i), R + (c_x, 0, i)], Segment[R + (c_x, 0, i), R + (c_x, c_y, i)], Segment[R + (c_x, c_y, i), R + (0, c_y, i)], Segment[R + (0, c_y, i), R + (0, 0, i)]}, i, 0, c_z, 1)
L_{segment} = Join({S_1, S_2, S_3})
L_{point}: {R, R + (c_x, 0, 0), R + (c_x, c_y, 0), R + (0, c_y, 0), R + (0, 0, c_z), R + (c_x, 0, c_z), R + (c_x, c_y, c_z), R + (0, c_y, c_z)}
L_{polygones}: {Polygon[R + (0, 0, 0), R + (c_x, 0, 0), R + (c_x, 0, c_z), R + (0, 0, c_z), R + (0, 0, 0)], Polygon[R + (0, c_y, 0), R + (c_x, c_y, 0), R + (c_x, c_y, c_z), R + (0, c_y, c_z), R + (0, c_y, 0)], Polygon[R + (0, 0, 0), R + (c_x, 0, 0), R + (c_x, c_y, 0), R + (0, c_y, 0), R + (0, 0, 0)], Polygon[R + (0, 0, c_z), R + (c_x, 0, c_z), R + (c_x, c_y, c_z), R + (0, c_y, c_z), R + (0, 0, c_z)], Polygon[R + (0, 0, 0), R + (0, c_y, 0), R + (0, c_y, c_z), R + (0, 0, c_z), R + (0, 0, 0)], Polygon[R + (c_x, 0, 0), R + (c_x, c_y, 0), R + (c_x, c_y, c_z), R + (c_x, 0, c_z), R + (c_x, 0, 0)]}