運籌學實踐性題目代碼與運行結果

1、實踐類型題目1. 背包問題 。max f 4x1 5x2 6x33x1 4x2 5x3 10xi 0 且為整數， i 1,2,3從LINGO/MATLA兩B 種軟件里面任選一種軟件求解該背包問題？寫出源程序，并以截圖的方式給出求解結果。源代碼：model: sets: items/item1.item3/:include,weight,rating; endsets data:weight rating=3 44 55 6; knapsack_capacity=10;enddata max=sum(items:rating*include); sum(items:weight*include)

2、=0; x2=0; x3=0;d1_=0; d1=0;d2_=0; d2=0;d3_=0; d3=0;d4_=0; d4=0;d5_=0; d5=0;d6_=0; d6=0;gin(x1); gin(x2);gin(x3);P1=1000; P2=100; P3=10;END實驗結果：.專業(yè)資料 .指派問題 的最小解。寫出源程序，3. 從LINGO/MATLA兩B 種軟件里面任選一種軟件，求下表所示效率矩陣的 并以截圖的方式給出求解結果。任務人員ABCDE甲759811乙9127119丙85469丁73696戊467511源代碼：model:!5 人指派問題 ;sets:Flight/1.5/

3、;Assign(Flight,Flight):c,x; endsets!Here is income matrix;data:c= 75981191271198546973696467511;enddata!Maximize value of assignments; min=sum(Assign: c*x);.專業(yè)資料 .for(Flight(i):!Each i must be assigned to some j; sum(Flight(j): x(i,j)=1;!Each i must receive an assignment;sum(Flight(j): x(j,i)=1;); e

4、nd 實驗結果：.專業(yè)資料 .4. 資源平行分配問題 。某工業(yè)部門按國家計劃的安排，擬將某高效率的設備五臺，分配給所屬的甲、乙、 丙三個工廠，各工廠若獲得這種設備之后，可以為國家提供的盈利如下表所示。問：這五臺設備如何分配 給各工廠， 才能使國家得到的盈利最大。 從 LINGO/MATLAB兩種軟件里面任選一種軟件求解該動態(tài)規(guī)劃問題？ 寫出源程序，并以截圖的方式給出求解結果。工廠設備臺數甲乙丙000013542710639111141211125131112源代碼：model: sets: ! 用戶 ;user/1.3/;! 設備量 ; amout/1.6/;! 分配方案 ;arcs(amou

5、t,user):benefit,status,selection; endsetsdata:! 效益 ;benefit= 00 0354710691111121112131112;! 特定分配量status=000111222333444555;enddatamax=sum(arcs(i,j):benefit(i,j)*selection(i,j);for(arcs:bin(selection);for(user(j):sum(arcs(k,j):selection(k,j)=1);sum(arcs(i,j):status(i,j)*selection(i,j)=5;.專業(yè)資料 .end 實驗

6、結果：.專業(yè)資料 .最小費用最大流問題。寫出源程序，5. 從LINGO/MATLAB兩種軟件里面任選一種軟件求解下面并以截圖的方式給出求解結果。源代碼：model: ! 最小費用最大流問題的子模型形式 ;sets:nodes/vs,v1,v2,v3,vt/; ! 定義端點代號 ;arcs(nodes,nodes)/vs v2,vs v1,v2 v1,v2 v3,v1 v3,v1 vt,v3 vt/:b,c,f; !定義弧代號Endsetsdata:b=1 4 2 3 6 1 2; !定義各弧的費用值 ;c=8 10 5 10 2 7 4; ! 定義各弧的容量 ; enddataSUBMODEL

7、 maxflow: ! 最大流的目標函數子模型 ;max = flow; ! 求最大流 ;endsubmodelsubmodel minfy: ! 最小費用流的目標函數子模型 ;min=sum(arcs:b*f); ! 求最小費用流 ;endsubmodelsubmodel con: ! 約束條件 ;for(nodes(i)|i #ne# 1 #and# i #ne# size(nodes): sum(arcs(i,j):f(i,j)-sum(arcs(j,i):f(j,i)=0); ! 中間點是進出相等 ;sum(arcs(i,j)|i #eq# 1: f(i,j) = flow;! 發(fā)點是流量 ;.專業(yè)資料 .for(arcs:bnd(0,f,c); ! 流量應小于容量 ; endsubmodelCALC: ! 程序段，順序執(zhí)行 ;SOLVE( maxflo