城市交通_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.