洛谷 P3371 【模板】单源最短路径

题目描述

如题，给出一个有向图，请输出从某一点出发到所有点的最短路径长度。

输入输出格式

输入格式：
第一行包含三个整数N、M、S，分别表示点的个数、有向边的个数、出发点的编号。

接下来M行每行包含三个整数Fi、Gi、Wi，分别表示第i条有向边的出发点、目标点和长度。

输出格式：
一行，包含N个用空格分隔的整数，其中第i个整数表示从点S出发到点i的最短路径长度（若S=i则最短路径长度为0，若从点S无法到达点i，则最短路径长度为2147483647）

输入输出样例

输入样例#1：
4 6 1
1 2 2
2 3 2
2 4 1
1 3 5
3 4 3
1 4 4
输出样例#1：
0 2 4 3
说明

时空限制：1000ms,128M

数据规模：

对于20%的数据：N<=5，M<=15

对于40%的数据：N<=100，M<=10000

对于70%的数据：N<=1000，M<=100000

对于100%的数据：N<=10000，M<=500000

样例说明：

分析：spfa模版题。

代码：

const  MaxE=10002;  MaxV=500001;type  rec=record   x,y,w,next:longint;  end;var  n,m,c,i,x,y,w,o:longint;  g:array [-1..Maxv] of rec;  ls:array [-1..Maxe] of longint;  v,d,list,sum:array [-1..maxe] of longint;procedure spfa(first:longint);var  head,tail,t,i:longint;begin  tail:=1; head:=0;  list[1]:=first;  for i:=1 to n do  d[i]:=maxlongint;  d[first]:=0;  v[first]:=1;  while tail<>head do    begin      head:=head mod maxe+1;      t:=ls[list[head]];      while t>0 do        with g[t] do          begin            if d[x]+w<d[y] then              begin                d[y]:=d[x]+w;                if v[y]=0 then                  begin                    v[y]:=1;                    tail:=tail mod maxe+1;                    list[tail]:=y;                  end;              end;            t:=next;          end;      v[list[head]]:=0;    end;end;procedure add(x,y,w:longint); begin  inc(o);  g[o].x:=x;  g[o].y:=y;  g[o].w:=w;  g[o].next:=ls[x];  ls[x]:=o; end;begin read(n,m,c); for i:=1 to m do  begin   read(x,y,w);   add(x,y,w);  end; spfa(c); for i:=1 to n do  write(d[i],' ');end.