Author: Exox Mi

Geoplano %v x %v

Pista 1

Pista 2

Recuerda el teorema de Pitágoras.

Puede que haya dos segmentos
que midan 5 unidades. Uno de ellos
posiblemente esté en diagonal.

k1 = 2 (slider from 2 to 6, step 1)
A1 = (0, 0)
B1 = (1, 0)
A2 = (0, 1)
B2 = (1, 1)
A3: 2.0 * A2 - A1
A4: 2.0 * A3 - A2
A5: 2.0 * A4 - A3
A6: 2.0 * A5 - A4
B3: 2.0 * B2 - B1
B4: 2.0 * B3 - B2
B5: 2.0 * B4 - B3
B6: 2.0 * B5 - B4
C1: 2.0 * B1 - A1
D1: 2.0 * C1 - B1
E1: 2.0 * D1 - C1
F1: 2.0 * E1 - D1
C2: 2.0 * B2 - A2
D2: 2.0 * C2 - B2
E2: 2.0 * D2 - C2
F2: 2.0 * E2 - D2
C3: 2.0 * B3 - A3
D3: 2.0 * C3 - B3
E3: 2.0 * D3 - C3
F3: 2.0 * E3 - D3
C4: 2.0 * B4 - A4
D4: 2.0 * C4 - B4
E4: 2.0 * D4 - C4
F4: 2.0 * E4 - D4
C5: 2.0 * B5 - A5
D5: 2.0 * C5 - B5
E5: 2.0 * D5 - C5
F5: 2.0 * E5 - D5
C6: 2.0 * B6 - A6
D6: 2.0 * C6 - B6
E6: 2.0 * D6 - C6
F6: 2.0 * E6 - D6
k: round(k1)
lista1 = Sequence(Polygon[(-0.5, -0.5), (s + 0.5, -1.0 * 0.5), (s + 0.5, s + 0.5), (-1.0 * 0.5, s + 0.5)], s, 1.0, 5.0)
c2 = Element(lista1, 1.0)
c3 = Element(lista1, 2.0)
c4 = Element(lista1, 3.0)
c5 = Element(lista1, 4.0)
c6 = Element(lista1, 5.0)
a = false
b = false
c = Segment(A1, B1)
texto3: "Geoplano " + k + "x" + k

Tool: Segmento
Elige dos puntos
Input: A1, B1
Output: c

c = Segment(A1, B1)