城市交通

城市交通Time Limit:1000MS  Memory Limit:65536KTotal Submit:101 Accepted:91Description　　有n个城市，编号1~n，有些城市之间有路相连，有些则没有，有路则当然有一个距离。现在规定只能从编号小的城市到编号大的城市，问你从编号为1的城市到编号为n的城市之间的最短距离是多少？Input先输入一个n，表示城市数，n小于100。 下面的n行是一个n*n的邻接矩阵map[i,j],其中map[i,j]=0表示城市i和城市j之间没有路相连，否则为两者之间的距离。Output输出格式：一个数，表示最少要多少时间。 输入数据保证可以从城市1飞到城市n。
var f:array[1..100]of longint; a:array[1..100,1..100]of longint; i,j,n,min:longint;begin read(n); for i:=1 to n do  for j:=1 to n do   read(a[i,j]);  f[1]:=0; for i:=2 to n do  begin   min:=maxint;   for j:=1 to i-1 do   if a[j,i]<>0 then    if f[j]+a[j,i]<=min then min:=f[j]+a[j,i];   f[i]:=min;  end; write(f[n]);
end.
转移方程f[i,j]:=min(f[i+1,j]+a[i,j],f[i,j])