Tangrama
Date: 3 Junio 2013

Tangrama es un juego que se compone de 7 piezas

2 triángulos rectángulo grandes

1 triángulo rectángulo mediano

2 triángulos rectángulos pequeños

1 cuadrado

1 romboide

Todas las piezas al juntarlas de tal manera forman un cuadrado


¡Vamos a hacerlo!

1.  Puede escoger la opción de plantilla para armar el cuadrado

2. Puede hacer otras figuras, como un triángulo, rectángulo, romboide, entre muchas más. Si desea ver la plantilla haga click en el cuadro respectivo

Plantilla

Rectángulo

Cuadrado

Triángulo

Romboide

Trapecio rectángulo 1

Trapecio isósceles

Trapecio rectángulo 2

Pentágono 1

Pentágono 2

Hexágono 1

Hexágono 2

Hexágono 3

Hexágono 4

Rota romboide

fc = 1.4 (slider from 0 to 2, step 0.1)
E = (14.103245739889974, -1.8466036211587333)
F: E + (1.25 * sqrt(2), 0)
gr = 0.3333333333333333
k = Circle(E, 0.75 * gr)
K = Point(k)
tp1: Angle[F, E, K] - 45°
ga = 0.7853981633974483 rad (slider from 0 to 6.283185307179586, step 0.017453292519943295)
T = (11.37754268674591, -3.4479511218420162)
C: T + (2.5, 0)
d = Circle(T, gr)
B = Point(d)
tm: Angle[C, T, B] - 45°
M = (11.923727614954009, -5.55420700151565)
a = true
A = (0, -3)
polígono9, l, r, a_1, b_1 = Polygon(A, A + (5 * fc * sqrt(2), 0), A + (5 * fc * sqrt(2), 2.5 * fc * sqrt(2)), A + (0, 2.5 * fc * sqrt(2)))
m3 = false
polígono10, d_1, h_1, i_1, j_1 = Polygon(A, A + (5 * fc, 0), A + (5 * fc, 5 * fc), A + (0, 5 * fc))
m2 = false
polígono11, m, n, g_1 = Polygon(A, A + (10 * fc, 0), A + (5 * fc, 5 * fc))
m1 = false
polígono12, k_1, l_1, m_1, n_1 = Polygon(A, A + (5 * fc * sqrt(2), 0), A + (7.5 * fc * sqrt(2), 2.5 * fc * sqrt(2)), A + (2.5 * fc * sqrt(2), 2.5 * fc * sqrt(2)))
m4 = false
polígono13, c_2, d_2, e_2, f_2 = Polygon(A, A + (7.5 * fc, 0), A + (2.5 * fc, 5 * fc), A + (0, 5 * fc))
m6 = false
polígono14, r_1, t_1, a_2, b_2 = Polygon(A, A + (7.5 * fc * sqrt(2), 0), A + (5 * fc * sqrt(2), 2.5 * fc * sqrt(2)), A + (2.5 * fc * sqrt(2), 2.5 * fc * sqrt(2)))
m5 = false
polígono15, g_2, h_2, i_2, j_2 = Polygon(A, A + (6.25 * fc * sqrt(2), 0), A + (3.75 * fc * sqrt(2), 2.5 * fc * sqrt(2)), A + (0, 2.5 * fc * sqrt(2)))
m7 = false
polígono16, k_2, l_2, m_2, n_2, p_2 = Polygon(A, A + (5 * fc * sqrt(2), 0), A + (5 * fc * sqrt(2), 1.25 * fc * sqrt(2)), A + (2.5 * fc * sqrt(2), 3.75 * fc * sqrt(2)), A + (0, 1.25 * fc * sqrt(2)))
m8 = false
polígono17, q_2, r_2, s_2, t_2, a_3 = Polygon(A, A + (7.5 * fc, 0), A + (8.75 * fc, 1.25 * fc), A + (8.75 * fc, 3.75 * fc), A + (3.75 * fc, 3.75 * fc))
m9 = false
polígono18, b_3, c_3, d_3, e_3, f_3, g_3 = Polygon(A, A + (3.75 * fc * sqrt(2), 0), A + (3.75 * fc * sqrt(2), 2.5 * fc * sqrt(2)), A + (2.5 * fc * sqrt(2), 3.75 * fc * sqrt(2)), A + (1.25 * fc * sqrt(2), 3.75 * fc * sqrt(2)), A + (0, 2.5 * fc * sqrt(2)))
m10 = false
polígono19, h_3, i_3, j_3, k_3, l_3, m_3 = Polygon(A + (2.5 * fc, 0), A + (5 * fc, 0), A + (7.5 * fc, 2.5 * fc), A + (5 * fc, 5 * fc), A + (2.5 * fc, 5 * fc), A + (0, 2.5 * fc))
m11 = false
polígono20, n_3, p_3, q_3, r_3, s_3, t_3 = Polygon(A + (1.25 * fc * sqrt(2), 0), A + (5 * fc * sqrt(2), 0), A + (6.25 * fc * sqrt(2), 1.25 * fc * sqrt(2)), A + (5 * fc * sqrt(2), 2.5 * fc * sqrt(2)), A + (1.25 * fc * sqrt(2), 2.5 * fc * sqrt(2)), A + (0, 1.25 * fc * sqrt(2)))
m12 = false
polígono21, a_4, b_4, c_4, d_4, e_4, f_4 = Polygon(A + (1.25 * fc, 0), A + (6.25 * fc, 0), A + (8.75 * fc, 2.5 * fc), A + (7.5 * fc, 3.75 * fc), A + (2.5 * fc, 3.75 * fc), A + (0, 1.25 * fc))
m13 = false
D: T + (2.5 * fc; ga * Div[tm + ga / 2, ga])
D' = Rotate(D, 90*°, T)
polígono2, d', t, d_5 = Polygon(T, D, D')
L: E + (1.25 * fc * sqrt(2); ga * Div[tp1 + ga / 2, ga])
L' = Rotate(L, 90*°, E)
polígono4, l', e_1, l_4 = Polygon(E, L, L')
P = (9.615985941506489, 2.320572479402295)
Q: P + (1.25 * sqrt(2), 0)
q = Circle(P, 0.75 * gr)
R = Point(q)
b: Angle[Q, P, R] - 45
tp2: Angle[Q, P, R] - 45°
S: P + (1.25 * fc * sqrt(2); ga * Div[tp2 + ga / 2, ga])
S' = Rotate(S, 90*°, P)
polígono6, s', s_1, p_1 = Polygon(S, P, S')
U = (19.803329437712428, -0.43315869072879254)
V: U + (2.5 * sqrt(2), 0)
e = Circle(U, 1.25 * gr)
W = Point(e)
tg1: Angle[V, U, W] - 45°
Z: U + (2.5 * fc * sqrt(2); ga * Div[tg1 + ga / 2, ga])
Z' = Rotate(Z, 90*°, U)
polígono7, z', z_2, u = Polygon(Z, U, Z')
A_1 = (21.16988450728249, -3.5252075688867768)
B_1: A_1 + (2.5 * sqrt(2), 0)
s = Circle(A_1, 1.25 * gr)
C_1 = Point(s)
tg2: Angle[B_1, A_1, C_1] - 45°
D_1: A_1 + (2.5 * fc * sqrt(2); ga * Div[tg2 + ga / 2, ga])
E_1 = Rotate(D_1, 90*°, A_1)
polígono8, e_5, a_7, d_6 = Polygon(A_1, D_1, E_1)
p = Circle(M, 1.25 * gr)
O = Point(p)
N: M + (1.25, 0)
cu: Angle[N, M, O] - 45°
F_1: M + (1.25 * fc; ga * Div[cu - 45 + ga / 2, ga])
G_1 = Rotate(F_1, 90*°, M)
H_1 = Mirror(F_1, M)
I_1 = Mirror(G_1, M)
polígono5, f_1, g_5, h_5, i_5 = Polygon(F_1, G_1, H_1, I_1)
J_1 = (6.095609097467079, -4.469411219063703)
K_1: J_1 + (1.25 * sqrt(2) / 2, 0)
c_1 = Circle(J_1, 1.25 * gr)
L_1 = Point(c_1)
pa: Angle[K_1, J_1, L_1] - 45°
M_1: J_1 + (1.25 * fc * sqrt(2) / 2; ga * Div[pa + ga / 2, ga])
N_1 = Mirror(M_1, J_1)
P_1 = Rotate(M_1, 90*°, N_1)
Q_1 = Mirror(P_1, J_1)
polígono22, n_4, q_1, m_4, p_4 = Polygon(N_1, Q_1, M_1, P_1)
c = Line(J_1, m_4)
G = Mirror(N_1, c)
H = Mirror(Q_1, c)
I = Mirror(M_1, c)
J = Mirror(P_1, c)
polígono22', g, h, i, j = Polygon(G, H, I, J)
f = 0 (slider from 0 to 1, step 1)
KK: K
RR: R
WW: W
CC: C_1
BB: B
LL: L_1
OO: O