演示启动 LINGO系统:
举例:
模型窗口中输入如下代码:
min=2*x1+3*x2;
x1+x2>=350;
2*x1+x2<=600;
x1>=100;
§ 1 LINGO快速入门例 1.1 求解如下 LP问题:
12
12
12
1
m in 2 3
350
2 600
100
xx
xx
xx
x




然后点击工具条上的按钮 即可例 1.2 计算 6个发点 8个收点的最小费用运输问题。
产销单位运价如下表。
单 销 地位运价产 地
B1 B2 B3 B4 B5 B6 B7 B8 产 量
A1 6 2 6 7 4 2 5 9 60
A2 4 9 5 3 8 5 8 2 55
A3 5 2 1 9 7 4 3 3 51
A4 7 6 7 3 9 2 7 1 43
A5 2 3 9 5 7 2 6 5 41
A6 5 5 2 2 8 1 4 3 52
销 量 35 37 22 32 41 32 43 38
程序:
model:
!6发点 8收点运输问题 ;
sets:
warehouses/wh1..wh6/,capacity;
vendors/v1..v8/,demand;
links(warehouses,vendors),cost,volume;
endsets
!目标函数 ;
min=@sum(links,cost*volume);
!需求约束 ;
@for(vendors(J):
@sum(warehouses(I),volume(I,J))=demand(J));
!产量约束 ;
@for(warehouses(I):
@sum(vendors(J),volume(I,J))<=capacity(I));
!数据部分 ;
data:
capacity=60 55 51 43 41 52;
demand=35 37 22 32 41 32 43 38;
cost=6 2 6 7 4 2 9 5
4 9 5 3 8 5 8 2
5 2 1 9 7 4 3 3
7 6 7 3 9 2 7 1
2 3 9 5 7 2 6 5
5 5 2 2 8 1 4 3;
enddata
end