Cómo utilizar la programación lingo para resolver la segunda pregunta de optimización de DVD de la pregunta B del Año Nacional de Modelado Matemático 2005, captura de pantalla

modelo:

título PRÉSTAMO DVD;

conjuntos:

DVD/1..100/:total;

usuario/1..1000/;

enlace(usuario,DVD):pianai,x;

necesidad(usuario,DVD):xuqiu;

A/1..1000/:d;

B/1..1000/:f;

terminales

min=@sum(DVD (I):total)/@SUM(enlace(i,j): pianai(i,j)*x(i,j));

@FOR(A:@BIN(d)) ;

@FOR(enlace:@BIN(x));

@sum(A(i):(d))=600;

@ FOR(B(i):f(i)=@sign(@sum(DVD(j):x(i,j))-1)+1);

@SUM(B(i) ):f(i))>=950;

@FOR(DVD(j):(@sum(usuario(i):x(i,j)*d(i))/2+ @sum(usuario(i):x(i,j)*(1-d(i))))<=total(j));

@FOR(usuario(i):@sum (DVD(j):x(i,j))=@sum(DVD(j):xuqiu(i,j)*x(i,j)));

@FOR(usuario( i):@sum(DVD(j):xuqiu(i,j)*x(i,j))=3*(d(i)+1)*f(i));

@FOR(usuario(i):@SUM(DVD(j):x(i,j))=3);

datos:

pianai=@OLE('D :\data00.xls','data00');

xuqiu=@OLE('D:\eij.xls','e');

enddata

fin