TAREA ACADÉMICA 3
CURSO: INVESTIGACIÓN OPERATIVA
PROGRAMACIÓN LINEAL
PROGRAMACIÓN MULTIOBJETIVO
PROGRAMACION ENTERA
ESTUDIANTE: JUAN RAFAEL VELAZCO VERA
CELULAR: 910981038
PROFESOR
Dr. Vasquez Espinoza Juan Manuel
Pregunta nro. 01 (05 puntos): MODELO DE TRANSPORTE 3X2X3.
CASO: EMPRESA TEXVAS
No olvide de validar el resultado.
Requisito obligatorio de originalidad: Al momento que realiza el modelamiento debe
aparecer en Lingo el mensaje ¡autor nombre y apellido! Caso contrario la pregunta
tendrá cero por falta de originalidad y falta de seguir instrucciones.
TIENDA 1
Planta 1 DM 300
COSTPROD 18 PV 32
CAPPROD 1000
Distribuidora 1
CAPDIST 700
TIENDA 1
Planta 2 DM 600
COSTPROD 17 PV 30
CAPPROD 500
Distribuidora 2
CAPDIST 800
TIENDA 1
Planta 3 DM 700
COSTPROD 15 PV 32
CAPPROD 500
INDICES:
Las plantas serán “i”
Las distribuidoras serán “j”
Las tiendas serán “k”
SOLUCIÓN ORIGINAL:
MODEL:
!i:1,2,3 (plantas);
!j:1,2 (distribuidores);
!k:1,2,3 (tiendas);
!JUAN RAFAEL VELAZCO VERA;
SETS:
PLANTA/1..3/: COSTPROD,CAPPROD;
DIST/1..2/: CAPDIST;
TIENDA/1..3/: DM,PV;
PD(PLANTA,DIST):X,CT_1;
DT(DIST,TIENDA):Y,CT_2;
ENDSETS
DATA:
COSTPROD=18, 17, 15;
CAPPROD= 1000, 500, 500;
CAPDIST= 700, 800;
DM=300, 600, 700;
PV=32, 30, 32;
CT_1=1, 2
1, 1
1, 1;
CT_2=1, 1, 1
2, 2, 2;
ENDDATA
MAX=@SUM(DT(J,K):PV(J)*Y(J,K)- CT_2(J,K)*Y(J,K))-
@SUM(PD(I,J):CT_1(I,J)*X(I,J)-COSTPROD(I)*X(I,J));
!RESTR;
@FOR(PLANTA(I):@SUM(DIST(J):X(I,J)) <= CAPPROD(I));
@FOR(DIST(J):@SUM(PLANTA(I):X(I,J)) <= CAPDIST(J));
@FOR(TIENDA(K):@SUM(DIST(J):Y(J,K)) <= DM(K));
!BALANCES;
@FOR(DIST(J):@SUM(PLANTA(I):X(I,J))=
@SUM(TIENDA(K):Y(J,K)));
END
Pregunta nro. 02 (05 puntos): MODELO DE TRANSPORTES Y DISTRIBUCION
CON INVENTARIOS EN DESTINO 2X3X3 CON LINGO.
CASO: EMPRESA TEXVAS
Requisito obligatorio de originalidad: Al momento que realiza el modelamiento debe
aparecer en Lingo el mensaje ¡autor nombre y apellido! Caso contrario la pregunta
tendrá cero por falta de originalidad y falta de seguir instrucciones.
Distribuidora 1 TIENDA 1
CAPDIST 1200 DM 1200
PV 30
Planta 1
.
COSTPROD 16
CAPPROD 2000 Distribuidora 2 TIENDA 1
CAPDIST 1200 DM 1100
PV 26
Planta 2
COSTPROD 14 Distribuidora 3
CAPPROD 2500 TIENDA 1
CAPDIST 1200 DM 1400
PV 28
INDICES:
Las plantas serán “i”
Las distribuidoras serán “j”
Las tiendas serán “k”
SOLUCIÓN ORIGINAL:
MODEL:
!JUAN RAFAEL VELAZCO VERA;
!i:1,2 (plantas);
!j:1,2,3 (distribuidores);
!k:1,2,3 (tiendas);
!l:1,2,3,4,5,6,7,8,9,10 (meses);
!JUAN RAFAEL VELAZCO VERA;
SETS:
PLANTA/A..B/: COSTPROD, CAPPROD;
DIST/1..3/: CAPDIST;
TIENDA/1..3/: II, PV;
MESES/1..10/:;
PD(PLANTA,DIST): CT_1;
DT(DIST,TIENDA): CT_2;
TM(TIENDA,MESES): DEMANDA, VENTA, IF;
PM(PLANTA,MESES):;
DM(DIST,MESES):;
PDM(PLANTA, DIST, MESES):X;
DTM(DIST, TIENDA, MESES):Y;
ENDSETS
DATA:
COSTPROD= 16 14;
CAPPROD= 2000 2500;
CAPDIST= 1200 1200 1200;
II= 0 0 0;
PV= 30 26 28;
CT_1= 2 1 3
2 3 2;
CT_2= 1 2 2
2 1 2
1 2 3;
DEMANDA= 1200 1400 1600 2000 1950 1700 1400 1300 1650 1800
1100 1500 1600 2000 1900 1850 1400 1400 1600 1900
1400 1600 1600 2100 2000 1800 1600 1500 1800 2000;
ENDDATA
MAX=@SUM(TM(K,L):PV(K)*VENTA(K,L))-
@SUM(DTM(J,K,L):CT_2(J,K)*Y(J,K,L))
-@SUM(PDM(I,J,L):CT_1(I,J)*X(I,J,L)+COSTPROD(I)*X(I,J,L));
!RESTR;
@FOR(PM(I,L):@SUM(DIST(J):X(I,J,L)) <= CAPPROD(I));
@FOR(DM(J,L):@SUM(PLANTA(I):X(I,J,L)) <= CAPDIST(J));
@FOR(TM(K,L):@SUM(TIENDA(K):VENTA(K,L)) <= DEMANDA(K,L));
!BALANCES DISTRIBUIDORES;
@FOR(DM(J,L):@SUM(PLANTA(I):X(I,J,L)) =
@SUM(TIENDA(K):Y(J,K,L)));
!BALANCE TIENDAS;
@FOR(TM(K,L)|L#EQ#1:II(K) + @SUM(DIST(J):Y(J,K,L)) = VENTA(K,L)
+ IF(K,L));
@FOR(TM(K,L)|L#GT#1:IF(K,L-1) + @SUM(DIST(J):Y(J,K,L)) =
VENTA(K,L) + IF(K,L));
END
Pregunta nro. 03 (05 puntos): MÉTODO MULTIOBJETIVO O POR METAS.
CASO: EMPRESA TEXVAS
Requisito obligatorio de originalidad: Al momento que realiza el modelamiento debe
aparecer en Lingo el mensaje ¡autor nombre y apellido! Caso contrario la pregunta
tendrá cero por falta de originalidad y falta de seguir instrucciones.
SOLUCIÓN ORIGINAL:
Pregunta nro. 04 (05 puntos): PROGRAMACIÓN ENTERA
CASO: EMPRESA TEXVAS
Requisito obligatorio de originalidad: Al momento que realiza el modelamiento debe
aparecer en Lingo el mensaje ¡autor nombre y apellido! Caso contrario la pregunta
tendrá cero por falta de originalidad y falta de seguir instrucciones.
SOLUCIÓN ORIGINAL:
