ZOJ 1203[Swordfish]

开始在各大OJ刷水题。这是一个MST，只是输入数据的时候需要重新构图，其他没什么

p.s.

Vara,b,f:array[-1..100000]of longint;e,xx,yy:array[-1..100000]of extended;n,m,cases:longint;sum:extended;
Procedure addgraph(x,y:longint;z:extended);begininc(m);a[m]:=x;b[m]:=y;e[m]:=z;end;
Procedure setgraph;vari,j:longint;beginfor i:=1 to n dofor j:=1 to n do if i<>j thenbeginADDGRAPH(I,J,SQRT((XX[I]-XX[J])*(XX[I]-XX[J])+(YY[I]-YY[J])*(YY[I]-YY[J])));end;end;
Procedure init;vari:longint;beginreadln(n);if n=0 then halt;for i:=1 to n do readln(xx[i],yy[i]);fillchar(f,sizeof(f),0);end;
Procedure qsort(l,r:longint);vari,j,y:longint;x,z:extended;begini:=l;j:=r;x:=e[(l+r)shr 1];Repeatwhile e[i]<x do inc(i);while e[j]>x do dec(j);if i<=j thenbeginy:=a[i];a[i]:=a[j];a[j]:=y;y:=b[i];b[i]:=b[j];b[j]:=y;z:=e[i];e[i]:=e[j];e[j]:=z;inc(i);dec(j);end;until i>j;if i<r then qsort(i,r);if l<j then qsort(l,j);end;
Function find(x:longint):longint;vark:longint;begink:=x;while f[k]<>0 do k:=f[k];find:=k;end;
Procedure kruskal;vari,j,p,q:longint;beginqsort(1,m);sum:=0;for i:=1 to m dobeginp:=find(a[i]);q:=find(b[i]);if p<>q thenbeginf[q]:=p;sum:=sum+e[i];end;end;write('The minimal distance is: ');writeln(sum:0:2);end;
Begincases:=0;n:=1;while n<>0 dobegininc(cases);init;if (n<>0)and(cases<>1) then writeln;writeln('Case #',cases,':');m:=0;setgraph;kruskal;end;
End.

ZOJ竟然让我体验了一把PE……

转载于:https://www.cnblogs.com/FreeDestiny/archive/2011/10/14/2212467.html

ZOJ 1203[Swordfish]相关推荐

zoj 1203 Swordfish
链接:zoj 1203 题意:输入n个城市的坐标,输出使n个城市连通的最短路线的长度分析:通过坐标能够将两两之间的长度即权值算出,再用最小生成树的算法只是这个题要注意输出时的格式问题,两组数据间要 ...
ZOJ - 1203 Swordfish（最短路）
题目链接:http://acm.zju.edu.cn/onlinejudge/showProblem.do?problemCode=1203点击打开链接 Swordfish Time Limit: 2 ...
ZOJ 1203 Swordfish(最小生成树 kruskal)
题意给你n个点的坐标每个点都可与其它n-1个点相连求这n个点的最小生成树的权重裸的最小生成树直接kruskal咯 #include<cstdio> #include< ...
ZOJ:1203 Swordfish
题意:给你n个城市的坐标,要求你输出连通所有城市的最小线路长度. 思路:最小生成树.注意每两个样例之间有换行. #include <cstdio> #include <cmath&g ...
【ember zigbee】序章:协议栈相关文档学习笔记
原文地址:https://blog.csdn.net/tainjau/article/details/90648114 文章目录写在前面一.材料出处二.文档解析 2.1.EZSP Protoco ...
POJ ZOJ题目分类
POJ,ZOJ题目分类(多篇整合版,分类很细致,全面) 标签: 题目分类POJ整理 2015-04-18 14:44 1672人阅读评论(0) 收藏举报本文章已收录于: 分类: ACM资料(5) ...
POJ，ZOJ题目分类（多篇整合版，分类很细致，全面）
水题: 3299,2159,2739,1083,2262,1503,3006,2255,3094 初级: 一.基本算法: (1)枚举 (1753,2965) (2)贪心(13 ...
ZOJ 题目分类，学校的一个巨巨做的。
DP: 1011 NTA 简单题 1013 Great Equipment 简单题 1024 Calendar ...
poj题目详细分类及算法推荐题目
DP: 1011 NTA 简单题 1013 Great Equipment 简单题 1024 Calendar Game 简单题 ...
ACM POJ 题目分类（完整整理版本）
DP: 1011 NTA 简单题 1013 Great Equipment 简单题 1024 Calendar Game 简单题 ...

ZOJ 1203[Swordfish]

ZOJ 1203[Swordfish]相关推荐

最新文章

热门文章