编写下程序用lingo
问题描述：
编写下程序用lingo
某公司有6个建筑工地要开工,每个工地的位置（用平面坐标系a,b表示,距离单位：km)及水泥日用量d(单位：t),目前有两个临时料场位于A（5,1）B(2,7),日储量各有20t,假设从料场到工地之间均为直线道路相连.试制定每天的供应计划,即从A,B两个料场向其中的3个工地运送水泥,使总的吨千米数最小.a=1.25 8.7 0.5 5.75 3 7.25 b=1.25 0.75 4.75 5 6.5 7.75 d=3 5 4 7 6 11
答
你的问题就很奇怪 只向其中三个工地运吗? 这样也太浪费了 如果确认问题无误最好直接来找我没错啦，我们老师临时改的题目，告诉我程序怎么编这样写 不过改的真没什么意思 不典型 没意义model:sets:s1/1,2/:x0,y0;s2/1..6/:a,b,d,c;link(s1,s2):x;endsetsdata:a=1.258.70.5 5.7537.25;b=1.250.754.7556.57.75;d=3547611;x0=5 2;y0=1 7;enddatamin=@sum(link(i,j):@sqrt((a(j)-x0(i))^2+(b(j)-y0(i))^2)*d(j)*x(i,j));@for(s2(j):c(j)=@if(@sum(s1(i):x(i,j)) #gt# 0,1,0));@sum(s2(j):c(j))=3;@for(s2:@bin(c));@for(s1(i):@sum(s2(j):x(i,j))