
全国数学建模05年b题DVD优化第二问怎么用lingo编程求解,求大神帮我解答 15
函数见图片,第二问数据你可以在网站http://mcm.edu.cn/mcm05/problems2005c.asp找到,求大神解答...
函数见图片,第二问数据你可以在网站http://mcm.edu.cn/mcm05/problems2005c.asp找到,求大神解答
展开
1个回答
2015-07-13
展开全部
model:
title DVD LOAN;
sets:
DVD/1..100/:total;
user/1..1000/;
link(user,DVD):pianai,x;
need(user,DVD):xuqiu;
A/1..1000/:d;
B/1..1000/:f;
endsets
min=@sum(DVD(I):total)/@SUM(link(i,j): pianai(i,j)*x(i,j));
@FOR(A:@BIN(d));
@FOR(link:@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(user(i):x(i,j)*d(i))/2+@sum(user(i):x(i,j)*(1-d(i))))<=total(j));
@FOR(user(i):@sum(DVD(j):x(i,j))=@sum(DVD(j):xuqiu(i,j)*x(i,j)));
@FOR(user(i):@sum(DVD(j):xuqiu(i,j)*x(i,j))=3*(d(i)+1)*f(i));
@FOR(user(i):@SUM(DVD(j):x(i,j))=3);
data:
pianai=@OLE('D:\data00.xls','data00');
xuqiu=@OLE('D:\eij.xls','e');
enddata
end
title DVD LOAN;
sets:
DVD/1..100/:total;
user/1..1000/;
link(user,DVD):pianai,x;
need(user,DVD):xuqiu;
A/1..1000/:d;
B/1..1000/:f;
endsets
min=@sum(DVD(I):total)/@SUM(link(i,j): pianai(i,j)*x(i,j));
@FOR(A:@BIN(d));
@FOR(link:@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(user(i):x(i,j)*d(i))/2+@sum(user(i):x(i,j)*(1-d(i))))<=total(j));
@FOR(user(i):@sum(DVD(j):x(i,j))=@sum(DVD(j):xuqiu(i,j)*x(i,j)));
@FOR(user(i):@sum(DVD(j):xuqiu(i,j)*x(i,j))=3*(d(i)+1)*f(i));
@FOR(user(i):@SUM(DVD(j):x(i,j))=3);
data:
pianai=@OLE('D:\data00.xls','data00');
xuqiu=@OLE('D:\eij.xls','e');
enddata
end

2025-09-30 广告
上海艾羽信息科技有限公司是一家以CAE软件销售、技术咨询及服务,仿真咨询及规划布局为一体的高科技公司。作为ANSYS的合作伙伴,艾羽致力于将ANSYS推出的产品,通过业界性能颇佳、丰富的工程仿真软件产品组合帮助客户解决复杂的仿真难题。力求与...
点击进入详情页
本回答由VSH艾羽提供
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询