2012 公园内道路设计问题 程序设计.docVIP

西工大2012 B题 公园内道路设计问题 程序设计 问题一编程 function E=Kruskal(w) %图论最小生成树Kruskal避圈算法(使用时根据题目修改w和n) %w为邻接矩阵 w=xlsread(distance.xls) [m,n]=size(w); k=1; for i=1:n-1 for j=i+1:n if w(i,j)~=0 x(1,k)=w(i,j);%记录边 x(2,k)=i;%记录起点 x(3,k)=j;%记录终点 k=k+1; end end end k=k-1;%统计边数 k为边数 %步骤一 %冒泡法给边的大小排序 for i=1:k for j=i+1:k if x(1,i)x(1,j) a=x(1,i);x(1,i)=x(1,j);x(1,j)=a; a=x(2,i);x(2,i)=x(2,j);x(2,j)=a; a=x(3,i);x(3,i)=x(3,j);x(3,j)=a; end end end %给各点标号赋初值 for i=1:n l(i)=i; end %初始时选e1加入集合E E(1,1)=x(1,1); %E矩阵的第一行记录最小生成树的边长 E(2,1)=x(2,1); %E矩阵的第二行记录边的起点 E(3