Date: 5 Septiembre 2013

Mover el punto

Concepto de desigualdad

El cuadrado rojo se ubican en una esquina de un tablero de ajedrez, con cuadrados
blaco y negro, como muestra la figura. 
Si cambia la medida del cuadrado rojo ( poniendolo más pequeño)
¿Qué color prevalecerá el blanco o el negro?

a = 4.1 (slider from 0 to 5, step 0.1)
O = (0, 0)
A: (a, 0) + O
B: (2 * a, 0) + O
C: (0, a) + O
D: (a, a) + O
E: (2 * a, a) + O
F: (0, 2 * a) + O
G: (a, 2 * a) + O
H: (2 * a, 2 * a) + O
poly1, g, d, e, h = Polygon(G, D, E, H)
poly2, c, o, a_1, d_1 = Polygon(C, O, A, D)
Β = PointIn(poly1)
b = Segment(O, B)
f = Segment(O, F)
i = OrthogonalLine(Β, b)
j = OrthogonalLine(Β, f)
Γ = Intersect(j, f)
Δ = Intersect(i, b)
Ε = Intersect(g, j)
Ζ = Intersect(i, d)
k = Segment(E, B)
l = Segment(G, F)
poly3, ε, β, ζ, d_2 = Polygon(Ε, Β, Ζ, D)
mavro: poly1 + poly3
aspro: a * (β + ε)
πολύγ1, f_1, g_1, d_3, c_1 = Polygon(F, G, D, C)
Α = Intersect(g, d_1)
πολύγ2, α, e_1, b_1, δ, a_2 = Polygon(Α, E, B, Δ, A)
m = Segment(Γ, Β)
n = Segment(Β, Δ)
p = Segment(Γ, O)
q = Segment(O, Δ)
κείμενο1: "Blanco = " + aspro + "
Negro = " + mavro + ""