lingo问题 看看下面程序哪出错了
lingo问题 看看下面程序哪出错了
2、进货问题
某商店拟制定某种商品7—12月的进货、售货计划,已知商店仓库最大容量为1500件,6月底已存货300件,年底的库存以不少于300件为宜,以后每月初进货一次,假设各月份该商品买进、售出单价如下表.
月 7 8 9 10 11 12
买进(元/件) 28 26 25 27 24 23.5
售出(元/件) 29 27 26 28 25 25
要求:若每件每月的库存费用为0.5元,问各月进货、售货各为多少件,才能使净收益最多?
model:
sets:
month/1..6/:storage1,storage2,buy,sell,buyprice,sellprice;
endsets
data:
buyprice=28 26 25 27 24 23.5;
sellprice= 29 27 26 28 25 25;
enddata
max=@sum(month:sellprice*sell-buyprice*buy-0.5*(storage1+storage2)/2);
storage1(1)=300+buy(1);
storage2(6)>=300;
@for(month(i):storage2(i)=storage1(i)-sell(i));
@for(month(i):storage1(i)=storage2(i-1)+buy(i));
@for(month:storage1
@for(month(i):storage1(i)=storage2(i-1)+buy(i));这一句属性下标越界,storage2(0)应该是6月底已存货300件
model:
sets:
month/1..6/:storage1,storage2,buy,sell,buyprice,sellprice;
endsets
data:
buyprice=28 26 25 27 24 23.5;
sellprice= 29 27 26 28 25 25;
enddata
max=@sum(month:sellprice*sell-buyprice*buy-0.5*(storage1+storage2)/2);
storage1(1)=300+buy(1);
storage2(6)>=300;
@for(month(i):storage2(i)=storage1(i)-sell(i));
storage1(1)=300+buy(1);
@for(month(i)|i#gt#1:storage1(i)=storage2(i-1)+buy(i));
@for(month:storage1