function?[minpath]=dijkstra（wstartterminal）
n=size（w1）;?label（start）=0;?f（start）=start;
for?i=1:n
???if?i~=start
???????label（i）=inf;
???end
end
s（1）=start;?u=start;
while?length（s）???for?i=1:n
??????ins=0;
??????for?j=1:length（s）
?????????if?i==s（j）
????????????ins=1;
?????????end
??????end
??????if?ins==0
?????????v=i;
?????????if??label（v）>（label（u）+w（uv））
????????????label（v）=（label（u）+w（uv））;?f（v）=u;
?????????end
??????end
???end
???v1=0;
???k=inf;
???for?i=1:n
?????????ins=0;
?????????for?j=1:length（s）
????????????if?i==s（j）
???????????????ins=1;
????????????end
?????????end
?????????if?ins==0
????????????v=i;
????????????if?k>label（v）
???????????????k=label（v）;??v1=v;
????????????end
?????????end
???end
???s（length（s）+1）=v1;??
???u=v1;
end
min=label（terminal）;?path（1）=terminal;
i=1;?
while?path（i）~=start
??????path（i+1）=f（path（i））;
??????i=i+1?;
end
?path（i）=start;
L=length（path）;
path=path（L:-1:1）;

?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----
?????文件????????2020??2016-05-26?11:35??k最短路程序\main.m
?????文件?????????982??2016-05-24?10:22??k最短路程序\dijkstra.m
?????文件????????1854??2016-05-20?19:27??k最短路程序\findPath.m
?????文件???????14350??2016-05-25?15:34??k最短路程序\計算結果.png
?????目錄???????????0??2016-05-26?11:23??k最短路程序\