小萨的烦恼-SSL 1624

【题目描述】 
　　小萨将给出一张地图，它可以看做一个有N（N<=100）个结点的图。这张地图有N个公共汽车站，小萨只可以在这N个汽车站上公共汽车。有些车站之间存在一条双向通路，无论是公共汽车还是小萨，都只能走这些通路。若两个车站之间的距离为d，步行所需要的时间为2*d秒，坐公共汽车所需要的时间为d秒。小萨他们只有T秒的时间，他希望你求出他和他的MM出去约会后能否及时赶回来，若不能，则输出“You are day dreaming!”，否则输出他们所需要花费的最少时间。 
注意：一张公共汽车车票可以使用两次（只可以搭乘同一辆公共汽车），即可以认为小萨去约会地点的时间和回来的时间相等。 


Input 

第一行有三个整数N、T、S 
接下来是一个N*N的邻接矩阵。两两车站之间的距离不超过10^9。A[I,j]为0表示I和J车站不连通。 


Output 

若小萨他们不能在限定时间内赶回学校，那么输出“You are day dreaming!”（不包括引号） 
否则，输出一个整数，为他们所需要花费的最少时间。 


Sample Input 


4 5 4
0 1 1 1
1 0 1 1
1 1 0 1
1 1 1 0


Sample Output 


2

题解：这道题用枚举，然后再用弗洛伊德。

const
  maxn=100;
var
  a:array[0..maxn,0..maxn,0..10] of longint;
  n,t,s,i,j,k,p:longint;
begin
  readln(n,t,s);
  for i:=1 to n do
   begin
    for j:=1 to n do
     begin
       read(a[i,j,2]);
       if a[i,j,2]=0 then a[i,j,2]:=100000000;
       a[i,j,1]:=a[i,j,2]*2;
     end;
     readln;
   end;
   for k:=1 to n do
   for i:=1 to n do
    for j:=1 to n do
    if (i<>j) and (j<>k) and (i<>k) then
     begin
       if a[i,k,1]+a[k,j,1]<a[i,j,1]
        then a[i,j,1]:=a[i,k,1]+a[k,j,1];
       if a[i,k,2]+a[k,j,1]<a[i,j,2]
        then a[i,j,2]:=a[i,k,2]+a[k,j,1];
       if a[i,k,1]+a[k,j,2]<a[i,j,2]
        then a[i,j,2]:=a[i,k,1]+a[k,j,2];
     end;
     p:=a[1,s,2]*2;
     if p<=t then writeln(p)
      else writeln('You are day dreaming!');
end.