LINGO8.0 for windows软件及应用（编译）

wanbaocheng · 发表于 2005-7-24 23:24:37

<

>问题1：
<

>孤胆一心，你的程序在LINGO8.0中运行正常，输出为
<

>Global optimal solution found at iteration: 366 Objective value: 50.00000
 Variable Value Reduced Cost PERIOD 50.00000 0.000000 T( A) 45.00000 0.000000 T( B) 11.00000 0.000000 T( C) 9.000000 0.000000 T( D) 50.00000 0.000000 T( E) 15.00000 0.000000 T( F) 12.00000 0.000000 T( G) 12.00000 0.000000 T( H) 12.00000 0.000000 T( I) 12.00000 0.000000 T( J) 8.000000 0.000000 T( K) 9.000000 0.000000 X( A, 1) 1.000000 0.000000 X( A, 2) 0.000000 45.00000 X( A, 3) 0.000000 0.000000 X( A, 4) 0.000000 0.000000 X( B, 1) 0.000000 0.000000 X( B, 2) 0.000000 11.00000 X( B, 3) 1.000000 0.000000 X( B, 4) 0.000000 0.000000 X( C, 1) 0.000000 0.000000 X( C, 2) 0.000000 9.000000 X( C, 3) 0.000000 0.000000 X( C, 4) 1.000000 0.000000 X( D, 1) 0.000000 0.000000 X( D, 2) 1.000000 50.00000 X( D, 3) 0.000000 0.000000 X( D, 4) 0.000000 0.000000 X( E, 1) 0.000000 0.000000 X( E, 2) 0.000000 15.00000 X( E, 3) 1.000000 0.000000 X( E, 4) 0.000000 0.000000 X( F, 1) 0.000000 0.000000 X( F, 2) 0.000000 12.00000 X( F, 3) 0.000000 0.000000 X( F, 4) 1.000000 0.000000 X( G, 1) 0.000000 0.000000 X( G, 2) 0.000000 12.00000 X( G, 3) 0.000000 0.000000 X( G, 4) 1.000000 0.000000 X( H, 1) 0.000000 0.000000 X( H, 2) 0.000000 12.00000 X( H, 3) 1.000000 0.000000 X( H, 4) 0.000000 0.000000 X( I, 1) 0.000000 0.000000 X( I, 2) 0.000000 12.00000 X( I, 3) 1.000000 0.000000 X( I, 4) 0.000000 0.000000 X( J, 1) 0.000000 0.000000 X( J, 2) 0.000000 8.000000 X( J, 3) 0.000000 0.000000 X( J, 4) 1.000000 0.000000 X( K, 1) 0.000000 0.000000 X( K, 2) 0.000000 9.000000 X( K, 3) 0.000000 0.000000 X( K, 4) 1.000000 0.000000
 Row Slack or Surplus Dual Price 1 50.00000 -1.000000 2 0.000000 0.000000 3 0.000000 0.000000 4 0.000000 0.000000 5 0.000000 0.000000 6 0.000000 0.000000 7 0.000000 0.000000 8 0.000000 0.000000 9 0.000000 0.000000 10 0.000000 0.000000 11 0.000000 0.000000 12 0.000000 0.000000 13 2.000000 0.000000 14 1.000000 0.000000 15 0.000000 0.000000 16 0.000000 0.000000 17 0.000000 0.000000 18 0.000000 0.000000 19 1.000000 0.000000 20 0.000000 0.000000 21 0.000000 0.000000 22 1.000000 0.000000 23 1.000000 0.000000 24 0.000000 0.000000 25 5.000000 0.000000 26 0.000000 1.000000 27 0.000000 0.000000 28 0.000000 0.000000 问题2：
#eq#是用来判断两个数是否相等，如果相等，值为1；否则值为0。而“=”是指定两个式子一定相等，比如“a=b”就要求式子a和式子b相等，或者就是说a #eq# b这个判断恒为真。
不知说明白没有，若有问题，请不要客气。

wanbaocheng · 发表于 2005-7-24 23:25:50

ringer您好，可否谈一下不喜欢LINGO的原因，交流交流！

Latewinds · 发表于 2005-7-25 09:17:19

<

>谢了
<

>latewinds@126.com

brush · 发表于 2005-7-25 09:48:30

<

>给我一份,谢谢了
<

><a href="mailtbuptkevin@163.com" target="_blank" >buptkevin@163.com</A>

wanbaocheng · 发表于 2005-7-25 15:59:38

已发送，请查收！

sslazioweng · 发表于 2005-7-25 18:58:52

<

>楼主，能否发我：<a href="mailtsslazioweng@yahoo.com.cn" target="_blank" >sslazioweng@yahoo.com.cn</A>

孤胆一心 · 发表于 2005-7-25 19:10:36

<

>wangbaocheng 老师：
<

>1。为什么你的lingo08能够运行，而我的不能，如果是参数设置的问题还请您赐教？
<

>如果是正版和盗版的问题，您知不知道那有正版软件？
 多谢您的答复！！！[em01][em49][em49]

孤胆一心 · 发表于 2005-7-25 19:19:08

<DIV class=quote>以下是引用孤胆一心在2005-7-23 22:39:35的发言： 
<

>在看了wangbaocheng 老师的lingo资料后，有一问题想请教：
<

>model: sets: task/A B C D E F G H I J K/:t; station/1..4/; precede(task,task)/A,B B,C C,F C,G F,J G,J D,E E,H E,I H,J I,J J,K/; link(task,station):x; endsets data: t=45 11 9 50 15 12 12 12 12 8 9; enddata min=period; @for(link

bin(x)); @for(task(i): @sum(station(k):x(i,k))=1); @for(precede(i,j): @sum(station(k):k*x(j,k)-k*x(i,k))>=0); @for(station(k): @sum(link(i,k):x(i,k)*t(i))<=period); end
<

>请问这个程序有什么错误么？为什么运行之后出现：
Unexpected fall though Newton loop:Contact LINDO 
Systems for patch availability。以上程序改成：</DIV>
<DIV class=quote>model: sets: task/A B C D E F G H I J K/:t; station/1..4/:period; precede(task,task)/A,B B,C C,F C,G F,J G,J D,E E,H E,I H,J I,J J,K/; link(task,station):x; endsets data: t=45 11 9 50 15 12 12 12 12 8 9; enddata <a href="mailtmin=@max(station(k):period(k" target="_blank" >min=@max(station(k):period(k</A>)); @for(link

bin(x)); @for(task(i): @sum(station(k):x(i,k))=1); @for(precede(i,j): @sum(station(k):k*x(j,k)-k*x(i,k))>=0); @for(station(k): @sum(link(i,k):x(i,k)*t(i))=period(k)); end</DIV>
<DIV class=quote>应该也行吧？我的lingo08还是不能运行这个程序，只好借你的一用了</DIV>[em44][em44][em44][em17][em11][em11]

孤胆一心 · 发表于 2005-7-25 19:33:46

<

>在看了wangbaocheng 老师的lingo资料后，又有一问题想请教<例7.3 旅行售货员问题>：
<

>model: sets: city/A B C D E F G/:u; link(city,city):price,x; endsets data: price=0 2 4 6 2 5 7 2 0 3 6 7 4 1 4 3 0 1 8 9 2 6 6 1 0 4 8 3 2 7 8 4 0 3 2 5 4 9 8 3 0 5 7 1 2 3 2 5 0; enddata <a href="mailtmin=@sum(link(i,j):price(i,j)*x(i,j" target="_blank" >min=@sum(link(i,j):price(i,j)*x(i,j</A>)); @for(city(j)

sum(city(i):x(i,j))=1); @for(city(i)

sum(city(j):x(i,j))=1); @for(city(i):x(i,i)=0); @for(link

bin(x)); @for(link(i,j)|i #ne# j #and# (i #and# j) #ge# 2:u(i)-u(j)+7*x(i,j)<=6);
<

>!1：这句是为了表达"ui-uj+7*x(i,j)<=6且2<=i,j<=7,i不等于j"这个条件的，语法正确么？ @for(city:@gin(u));
！2：u 的默认值是大于零的么？在这里面不用写u大于零的条件吧
不好意思，我的lingo08还是出现了
Unexpected fall though Newton loop:Contact LINDO 
Systems for patch availability。
的问题。[em01][em01][em01][em01]

wanbaocheng · 发表于 2005-7-25 20:42:52

已发送，请查收！

		自动登录	找回密码
密码			注-册-帐-号

LINGO8.0 for windows软件及应用（编译）

为什么会这样？