数学建模怎样用lingo程序编写？

来源：百度知道 编辑：UC知道 时间：2024/05/14 16:22:03
3有七种规格的包装箱要装到两辆平板车上去。包装箱的宽和高是一样的，但是厚度（t,以厘米计）及其重量（w以公斤计）是不同的。下表给出了每种包装箱的厚度、重量和数量。每辆平板车有10.2米长的地方可用来装包装箱（像面包片一样），载重为40吨。由于当地货运的限制，对C5,C6,C7类的包装箱的总数有一定的限制：这类箱子所占的空间（厚度）不能超过302.7厘米。试把包装箱（见下表）装到平板车上去使得浪费的空间最小。

C1 C2 C3 C4 C5 C6 C7
t厘米 48.7 52.0 61.3 72.0 48.7 52.0 64.0
W公斤 2000 3000 1000 500 4000 2000 1000
件数 8 7 9 6 6 4 8

model:
sets:
liu/1..7/:t,w,p;
wen/1..2/:;
jie(liu,wen):x;
endsets
min=obj;
obj=2*k-@sum(jie(i,j):x(i,j)*t(i));
@for(wen(j):@sum(liu(i):x(i,j)*t(i))<=k);
@for(wen(j):@sum(liu(i)|i#ge#5:x(i,j)*t(i))<=q);
@for(wen(j):@sum(liu(i):x(i,j)*w(i))<=M);
@for(liu(i):@sum(wen(j):x(i,j))<=p(i));
@for(jie(i,j):@gin(x(i,j)));
data:
t=48.7,52.0,61.3,72.0,48.7,52.0,64.0;
w=2,3,1,5,4,2,1;
p=8,7,9,6,6,4,8;
k=1020;
M=40;
q=302.7;
@text('f:\new\wen.txt')=@write('obj:',' ',obj,@newline(1));
@text('f:\new\wen.txt')=@writefor(wen(j):j,' ',
@writefor(liu(i):' ',x(i,j)),@newline(1));
enddata
End

去图书馆找本关于Lingo的书，看一个上午你就可以解决上面的问题了。