zhonghang 发表于 2010-8-4 13:51

悬赏中……

这是我编的一个LINGO程序，不知哪里有点问题，结果出来是负数与题目不符合，但没语法错误，请高手看一下啦！！！（题目见附件）（另外怎样使用悬赏功能啊！！！）
MODEL:
SETS:
VA/V1..V5/:EV;
VM/M1..M6/:;
VA_1/V1,V2/:;
VA_2/V3,V4,V5/:;
LINKS(VA,VM):A,B,C,D;
ENDSETS
DATA:
EV=8.8 6.1 2.0 4.2 5.0;
D=1100 1200 1300 1100 1150
  1300 1300 1100 900 1150
  1100 1400 1300 1000 950
  1200 1100 1200 1200 1250
  1000 1200 1500 1100 1050
  900 1000 1400 800 1350;
ENDDATA
MAX=1800*@SUM(LINKS(I,J):B(I,J))-@SUM(LINKS(I,J):A(I,J)*D(I,J))-50*@SUM(LINKS(I,J):C(I,J))-270*6-310*6;   !目标函数;
@FOR(VM(J):@SUM(VA_1(I):B(I,J))<=200);
@FOR(VM(J):@SUM(VA_2(I):B(I,J))<=250);
@FOR(LINKS(I,J):C(I,J)<=1000);
@FOR(VA(I):500+A(I,1)-B(I,1)-C(I,1)=0);
@FOR(VA(I):C(I,1)+A(I,2)-B(I,2)-C(I,2)=0);
@FOR(VA(I):C(I,2)+A(I,3)-B(I,3)-C(I,3)=0);
@FOR(VA(I):C(I,3)+A(I,4)-B(I,4)-C(I,4)=0);
@FOR(VA(I):C(I,4)+A(I,5)-B(I,5)-C(I,5)=0);
@FOR(VA(I):C(I,5)+A(I,6)-B(I,6)-500=0);
@FOR(VA(I):@SUM(VM(J):A(I,J))-@SUM(VM(J):B(I,J))=0);
M=@SUM(VA(I):EV(I));
@FOR(VM(J):@SUM(VA(I):EV(I)*B(I,J))>=3*M);
@FOR(VM(J):@SUM(VA(I):EV(I)*B(I,J))<=6*M);
@FOR(LINKS(I,J):@GIN(A(I,J)));
@FOR(LINKS(I,J):@GIN(B(I,J)));
@FOR(LINKS(I,J):@GIN(C(I,J)));
END

fc013 发表于 2010-8-4 19:57

上传了两个文档，内容一样，都是这道题的论文，有一个是pdf格式，你可以看看其中的程序及假设，找一下自己论文中的问题：


zhonghang 发表于 2010-8-6 12:35

拜谢中……………………………………
{:3_59:}{:3_59:}{:3_59:}

zhj75 发表于 2010-8-26 11:33

声明一下：本人看贴和回贴的规则，好贴必看，精华贴必回。

hank 发表于 2010-8-26 11:34

我要把这个帖子一直往上顶，往上顶！

ffboy 发表于 2010-8-26 11:35

强人，佩服死了。呵呵，不错啊

justtry 发表于 2010-8-26 11:36

楼主的帖子实在是写得太好了。可是我立刻想到，这么好的帖子，倘若别人看不到，那么不是浪费楼主的心血吗？经过痛苦的思想斗争，我终于下定决心，牺牲小我，奉献大我。我要拿出这帖子奉献给世人赏阅，我要把这个帖子一直往上顶，往上顶！顶到所有人都看到为止！  

clarklee00 发表于 2010-8-26 11:38

楼主的帖子实在是写得太好了。可是我立刻想到，这么好的帖子，倘若别人看不到，那么不是浪费楼主的心血吗？经过痛苦的思想斗争，我终于下定决心，牺牲小我，奉献大我。我要拿出这帖子奉献给世人赏阅，我要把这个帖子一直往上顶，往上顶！顶到所有人都看到为止！  

泓缘 发表于 2010-8-26 11:46

顶顶更健康，越顶吃的越香。

pipi2142001 发表于 2010-8-26 13:52

试试运气啦~~~~~~~~~~~
页: [1] 2 3 4
查看完整版本: 悬赏中……