Quadrats

Pentàgons

Hexàgons

Triangles

Irregulars

A = (3, 2)
B = (3, -2)
a_1 = Line(A, B)
b_1 = OrthogonalLine(B, a_1)
D = Point(b_1)
C = Point(a_1)
Polígon1, b, c, a = Polygon(C, B, D)
Q1, e, f, g, h, E, F = Polygon(C, D, 4)
Q2, i, j, k, l, G, H = Polygon(B, C, 4)
Q3, m, n, p, q, I, J = Polygon(D, B, 4)
α, β, γ = Angle(Polígon1)
d = false
Polígon2, r, s, t, c_1, d_1, K, L, M = Polygon(C, D, 5)
Polígon3, e_1, f_1, g_1, h_1, i_1, N, O, P = Polygon(D, B, 5)
Polígon4, j_1, k_1, l_1, m_1, n_1, Q, R, S = Polygon(B, C, 5)
text1: "Àrea de P1  =  " + a + "²  =   " + Q1 + ""
text2: "Àrea de P2  =  " + b + "²  =   " + Q2 + ""
text3: "Àrea de P3  =  " + c + "²  =   " + Q3 + ""
o = false
text4: "Àrea de P1  =  " + Polígon2 + ""
Polígon5, p_1, q_1, r_1, s_1, t_1, a_2, T, U, V, W = Polygon(C, D, 6)
Polígon6, b_2, c_2, d_2, e_2, f_2, g_2, Z, A_1, B_1, C_1 = Polygon(D, B, 6)
Polígon7, h_2, i_2, j_2, k_2, l_2, m_2, D_1, E_1, F_1, G_1 = Polygon(B, C, 6)
u = false
text5: "Àrea de P2  = " + Polígon4 + ""
text6: "Àrea de P3  = " + Polígon3 + ""
Polígon8, n_2, p_2, q_2, H_1 = Polygon(C, D, 3)
Polígon9, r_2, s_2, t_2, I_1 = Polygon(B, C, 3)
Polígon10, a_3, b_3, c_3, J_1 = Polygon(D, B, 3)
text10: "Àrea de P1  = " + Polígon8 + ""
v = false
text11: "Àrea de P2  = " + Polígon9 + ""
text12: "Àrea de P3  = " + Polígon10 + ""
K_1 = (11, 0)
L_1 = (8, 1)
M_1 = (5, 1)
Polígon11, c_4, d_3, k_3, l_3, m_3 = Polygon(C, D, K_1, L_1, M_1)
w = Vector(D, C)
D' = Translate(D, w)
C' = Translate(C, w)
D'_1 = Translate(D, w)
N_1 = Translate(K_1, w)
O_1 = Translate(L_1, w)
P_1 = Translate(M_1, w)
Polígon11', c', d'_1, n_3, o_1, p_3 = Polygon(C', D'_1, N_1, O_1, P_1)
C'' = Rotate(C', 180° - α, C)
Q_1 = Rotate(D'_1, 180° - α, C)
R_1 = Rotate(N_1, 180° - α, C)
S_1 = Rotate(O_1, 180° - α, C)
T_1 = Rotate(P_1, 180° - α, C)
Polígon11'', c'', q_3, r_3, s_3, t_3 = Polygon(C'', Q_1, R_1, S_1, T_1)
C''' = Dilate(C'', b / a, C)
U_1 = Dilate(Q_1, b / a, C)
V_1 = Dilate(R_1, b / a, C)
W_1 = Dilate(S_1, b / a, C)
Z_1 = Dilate(T_1, b / a, C)
Polígon11''', c''', u_1, v_1, w_1, z_1 = Polygon(C''', U_1, V_1, W_1, Z_1)
u_2 = Vector(C, D)
C'_1 = Translate(C, u_2)
D'_2 = Translate(D, u_2)
A_2 = Translate(K_1, u_2)
B_2 = Translate(L_1, u_2)
C_2 = Translate(M_1, u_2)
Polígon11'_1, c'_1, d'_2, a_4, b_4, c_5 = Polygon(C'_1, D'_2, A_2, B_2, C_2)
D_2 = Rotate(C'_1, (-(180° - γ)), D)
E_2 = Rotate(D'_2, (-(180° - γ)), D)
F_2 = Rotate(A_2, (-(180° - γ)), D)
G_2 = Rotate(B_2, (-(180° - γ)), D)
H_2 = Rotate(C_2, (-(180° - γ)), D)
Polígon12, d_4, e_3, f_3, g_3, h_3 = Polygon(D_2, E_2, F_2, G_2, H_2)
I_2 = Dilate(D_2, c / a, D)
J_2 = Dilate(E_2, c / a, D)
K_2 = Dilate(F_2, c / a, D)
L_2 = Dilate(G_2, c / a, D)
M_2 = Dilate(H_2, c / a, D)
Polígon12', i_3, j_3, k_4, l_4, m_4 = Polygon(I_2, J_2, K_2, L_2, M_2)
text13: "Àrea de P1  = " + Polígon11 + ""
text14: "Àrea de P2  = " + Polígon11''' + ""
text15: "Àrea de P3  =" + Polígon12' + ""
oo = false
text7: "Àrea de P1  = " + Polígon11 + ""
text8: "Àrea de P2  = " + Polígon11''' + ""
text9: "Àrea de P2  = " + Polígon12' + ""