Problema de Programación Lineal
Author: Juan Fernando López

Una escuela prepara una excursión para 400 estudiantes. La empresa de transporte tiene 8 autocares de 40 plazas y 10 de 50 plazas, pero sólo dispone de 9 conductores. El alquiler de un autocar grande cuesta 80 €, y el de uno pequeño, 60 €.
Calcular cuántos autocares de cada tipo hay que utilizar para que la excursión resulte lo más económica posible para la escuela.

F(x,y)=60x+80y

regsol(x, y) = (x ≥ 0) ∧ (x ≤ 8) ∧ (y ≥ 0) ∧ (y ≤ 10) ∧ ((40 * x) + (50 * y) ≥ 400) ∧ (x + y ≤ 9)
a = 0 (slider from 0 to 800, step 1)
b: (60 * x) + (80 * y) = a
C = Intersect(c, yAxis)
D = Point(b)
RectaObjeto: "F(x,y)=" + a
B = Intersect(yAxis, i)
A = Intersect(i, c)
S = PointIn(regsol)
S1 = 0
ValorPuntoRegion: "Para el punto S=" + S + "
F" + S + "= " + ((60 * x(S)) + (80 * y(S))) + ""
lista1 = Sequence((60 * x) + (80 * y) = t, t, 0, 720, 20)