F(x, y) = 2000 * x + 3000 * y
a(x, y) = (0 ≤ x) ∧ (0 ≤ y) ∧ (2 ≤ x) ∧ (x ≤ 7) ∧ (2 ≤ y) ∧ (y ≤ 7) ∧ (6 ≤ x + y) ∧ (x ≤ 2 * y)
A = Intersect(r6, r3)
B = Intersect(r7, r3)
C = Intersect(r5, r7)
D = Intersect(r8, r4)
E = Intersect(r6, r4)
P = PointIn(Polygon[{A, B, C, D, E}])
texto1: "F(" * x(P) * ", " * y(P) * ") = " * F(P)