Solución segmento BC

F(x, y) = x + y
regsol(x, y) = (x + y ≤ 10) ∧ (x - y ≤ 4) ∧ (x ≥ 0) ∧ (y ≥ 0) ∧ (y ≤ 7)
A = Intersect(b, xAxis)
B = Intersect(a_1, b)
a = 0 (slider from 0 to 100, step 1)
d: x + y = a
C = Intersect(a_1, e)
D = Intersect(e, yAxis)
O = Intersect(xAxis, yAxis)
texto1: "F(x,y)=" + F + ""
texto2: "F(x,y)=" + a + ""
E = Point(d)
c = Segment(C, B)