城市交通_ssl1636_floyd

Description

　　有n个城市，编号1~n，有些城市之间有路相连，有些则没有，有路则当然有一个距离。现在规定只能从编号小的城市到编号大的城市，问你从编号为1的城市到编号为n的城市之间的最短距离是多少？

Input

先输入一个n，表示城市数，n小于100。 

下面的n行是一个n*n的邻接矩阵map[i,j],其中map[i,j]=0表示城市i和城市j之间没有路相连，否则为两者之间的距离。



Output

输出格式：一个数，表示最少要多少时间。 

输入数据保证可以从城市1飞到城市n。 

Sample Input

11

0 5 3 0 0 0 0 0 0 0 0

5 0 0 1 6 3 0 0 0 0 0

3 0 0 0 8 0 4 0 0 0 0

0 1 0 0 0 0 0 5 6 0 0

0 6 8 0 0 0 0 5 0 0 0

0 3 0 0 0 0 0 0 0 8 0

0 0 4 0 0 0 0 0 0 3 0

0 0 0 5 5 0 0 0 0 0 3

0 0 0 6 0 0 0 0 0 0 4

0 0 0 0 0 8 3 0 0 0 3

0 0 0 0 0 0 0 3 4 3 0

Sample Output

13

思路：

因为是最短路所以想到最短路，n不大就用floyd。对于给定的邻接矩阵作floyd然后输出f[1,n]。

 

源代码/pas:

 

var
n,i,j,k:longint;
f:array[1..500,1..500]of longint;
begin
readln(n);
for i:=1 to n do
for j:=1 to n do
begin
read(f[i,j]);
if (f[i,j]=0)or(j<=i) then
f[i,j]:=maxlongint div 2;
end;
for k:=1 to n do
for i:=1 to n do
for j:=1 to n do
if (k<>i)and(k<>j)and(i<>j)and(f[i,k]+f[k,j]<f[i,j]) then
f[i,j]:=f[i,k]+f[k,j];
writeln(f[1,n]);
end.