vijos1046——最小环问题

1060: [Vijos 1046] 观光旅游

时间限制: 1 Sec  内存限制: 128 MB

题目描述

湖南师大附中成为百年名校之后，每年要接待大批的游客前来参观。学校认为大力发展旅游业，可以带来一笔可观的收入。
学校里面有Ｎ个景点。两个景点之间可能直接有道路相连，用Dist[I，J]表示它的长度；否则它们之间没有直接的道路相连。这里所说的道路是没有规定方向的，也就是说，如果从I到J有直接的道路，那么从J到I也有，并且长度与之相等。
学校规定：每个游客的旅游线路只能是一个回路（好霸道的规定）。也就是说，游客可以任取一个景点出发，依次经过若干个景点，最终回到起点。一天，Xiaomengxian决定到湖南师大附中旅游。由于他实在已经很累了，于是他决定尽量少走一些路。于是他想请你——一个优秀的程序员——帮他求出最优的路线。怎么样，不是很难吧？（摘自《郁闷的出纳员》）

输入

输入中有多组数据。请用SeekEof判断是否到达文件结束。
对于每组数据：
第一行有两个正整数N，M，分别表示学校的景点个数和有多少对景点之间直接有边相连。
（N<=100,M<=10000）
以下M行，每行三个正整数，分别表示一条道路的两端的编号，以及这条道路的长度。

输出

对于每组数据，输出一行：
如果该回路存在，则输出一个正整数，表示该回路的总长度；否则输出“No solution.”（不要输出引号）

样例输入

5 6
1 4 1
3 1 10
1 2 16
2 3 100
2 5 15
5 3 20
4 3
1 2 10
1 3 20
1 4 30

样例输出

61

No solution.

分析：

经典的最小环问题。

求最小环的方法：floyd。

floyd的核心代码有两个循环操作

一个是更新最小环，

一个是更新最短路。

?

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46

program vijos_1046;   var     i,ans,j,n,m,k,x,y,z,l:longint;     a,d:array[1..100,1..100]of longint;   function min(x,y:longint):longint;     begin       if x<y then exit(x);       exit(y);     end;   procedure doing;     var       i,j:longint;     begin       readln(n,m);       for i:=1 to n do         for j:=1 to n do           a[i,j]:=10000000;       for i:=1 to m do         begin           readln(x,y,z);           a[x,y]:=z;           a[y,x]:=z;         end;       ans:=10000000;       d:=a;       for k:=1 to n do         begin           for i:=1 to k-1 do             for j:=i+1 to k-1 do               ans:=min(ans,d[i,j]+a[i,k]+a[k,j]);           for i:=1 to n do             for j:=1 to n do               d[i,j]:=min(d[i,j],d[i,k]+d[k,j]);         end;       if ans=10000000 then writeln('No solution.')         else writeln(ans);     end;   begin     assign(input,'vijos.in');     reset(input);     assign(output,'vijos.out');     rewrite(output);     while not eof do doing;     close(input);     close(output);   end.