作业帮 > 综合 > 作业

求lingo高手!mcm1988b题目,用lingo咋写代码.新手待解救,财富不多,见谅!

来源:学生作业帮 编辑:作业帮 分类:综合作业 时间:2024/06/06 09:50:19
求lingo高手!mcm1988b题目,用lingo咋写代码.新手待解救,财富不多,见谅!
貌似自己写的很多错啊...先谢过了!
model:
Title:train problem;
sets:
huowu/1..7/:t,w,k;
train/1..2/:x;
link(huowu,train):h;
endsets
data:
t=48.7,52.0,61.3,72.0,48.7,52.0,64.0;
w=2000,3000,1000,500,4000,2000,1000;
k=8,7,9,6,6,4,3;
enddata
init:
x=1;
endinit
[OBJ]max=@for(train(j):@sum(huowu(i):h(i,j)*t(i)););
@for(huowu(i):[HUOWU_COM]@sum(train(j):h(i,j))=k(i););
@sum(huowu(i):h(i,1)*t(i)
model:Title: train problem;
sets:
huowu/1..7/:t,w,k;
train/1..2/:x;
link(huowu,train):h;
endsets
data:t=48.7,52.0,61.3,72.0,48.7,52.0,64.0;
w=2000,3000,1000,500,4000,2000,1000;
k=8,7,9,6,6,4,3;
enddata
init:
x=1;
endinit
[OBJ]max=@sum(train(j):@sum(huowu(i):h(i,j)*t(i)););
@for(huowu(i):[HUOWU_COM]@sum(train(j):h(i,j))=k(i));
@sum(huowu(i):h(i,1)*t(i))
再问: 不是吧,mcm1988B题啊!网上一搜就出来原题了,原题中有图表,不好往这里贴。用lingo该咋写,我们老师是用lindo写的,我感觉他那种写法效率不高。。。麻烦大神帮我用lingo写个。真心感谢!
再答: model: Title: train problem; sets:huowu/1..7/:t,w,k; train/1..2/:x; link(huowu,train):h,num; endsets data: t=48.7,52.0,61.3,72.0,48.7,52.0,64.0; w=2000,3000,1000,500,4000,2000,1000; k=8,7,9,6,6,4,3; l=1020; we=40000; enddata [OBJ] min=2*l-@sum(link(i,j):h(i,j)*t(i)*num(i,j)); @for(huowu(i):@sum(link(i,j):h(i,j)*num(i,j))