Korrapärane dodekaeeder on hulktahukas, millel on 
12 korrapärase viisnurga kujulist tahku ja 20 tippu,
30 serva ning igast tipust lähtub kolm serva.

A = Point(xAxis)
B = Point(yAxis)
C_{3} = Point(Circle[((A * (1 - sqrt(5))) + (B * (3 + sqrt(5)))) / 4, (Distance[A, B] * sqrt(10 + (2 * sqrt(5))) / 4), Segment[A, B]])
a, D, E, F, G, H, I, J, K, L, M, N, O, P, Q, R, S, T, faceABCDE, faceAEIOJ, faceABFKJ, faceBCGLF, faceCDHMG, faceDEINH, faceINSTO, faceJKPTO, faceFKPQL, faceGLQRM, faceHMRSN, facePQRST, edgeAE, edgeAB, edgeBC, edgeCD, edgeDE, edgeAJ, edgeEI, edgeIO, edgeJO, edgeJK, edgeFK, edgeBF, edgeFL, edgeGL, edgeCG, edgeGM, edgeHM, edgeDH, edgeHN, edgeIN, edgeNS, edgeST, edgeOT, edgePT, edgeKP, edgePQ, edgeLQ, edgeQR, edgeMR, edgeRS = Dodecahedron(A, B, C_{3})
b = 1 (slider from 0 to 1, step 0.01)
c, U, V, W, Z, A_1, B_1, C_1, D_1, E_1, F_1, G_1, H_1, I_1, J_1, K_1, L_1, M_1, N_1, O_1, P_1, Q_1, R_1, S_1, T_1, U_1, V_1, W_1, Z_1, A_2, B_2, C_2, D_2, E_2, F_2, G_2, H_2, I_2, J_2, face1, face3, face2, face4, face5, face6, face8, face7, face10, face11, face12, face9, edge1, edgeUV, edgeVW, edgeWZ, edge8, edge11, edge15, edge13, edge2, edge3, edge27, edge28, edge4, edge5, edge33, edge34, edge6, edge7, edge39, edge40, edge9, edge10, edge45, edge46, edge12, edge16, edge19, edge20, edge17, edge18, edge25, edge26, edge14, edge29, edge31, edge32, edge30, edge35, edge37, edge38, edge36, edge41, edge43, edge44, edge42, edge21, edge23, edge24, edge22 = Net(a, b)
tekst1: "Üheviisnurga pindala on S=" + face1 + ""
tekst2: "Kogu dodekaeederi pindala on S_d_o_d_e_k_a_e_e_d_e_r=" + ((face1 * 12)) + ""
K_2 = Midpoint(C_{3}, B)
L_2 = Midpoint(A, B)
f = Segment(D, L_2)
g = Segment(K_2, E)
k = Intersect(f, g)
r = Segment(k, K_2)
d = Circle(k, 0.97, xOyPlane)
tekst4: "Ühe viisnurga ümbermõõt on C=" + ((edge1 * 5)) + ""
C = Perimeter(face1)
tekst5: "S=\frac{C * r}{2} =\frac{" + (LaTeX[C]) + "*" + (LaTeX[r]) + "}{2}=\frac{" + (LaTeX[(C * r)]) + "}{2}=" + (LaTeX[(C * r / 2)]) + ""
Vv: ((15 + (7 * sqrt(5))) / 4 * edge1^(3))
tekst6: "V=\frac{15+7\sqrt{5}}{4}*" + (LaTeX[edge1]) + "^{3}≈" + (LaTeX[Vv]) + ""