www.gusucode.com > 用matlab和lingo软件解决了数学建模大赛2000年B题 > 用matlab和lingo软件解决了数学建模大赛2000年B题/钢管订购/findc.m
%计算任意两节点之间的最小运费函数 function c=findc(c1,c2) w=min(c1,c2);%将两节点之间的初始权矩阵定义为铁路与公路运费之中最小的 %用floyd算法计算最小运费 dist=w; for k=1:39 for i=1:39 for j=1:39 dist(i,j)=min((dist(i,k)+dist(k,j)),dist(i,j)); c(i,j)=dist(i,j); end end end