演算法：圖論（最短路）
分析：比較裸的最短路了，竟然錯在了有向圖上，導致此題本應ac的結果只拿了20分……恨！
program hldtymfs;
const
maxm=10000;
maxn=100;
diss:array [1..7] of longint=(2,6,4,8,6,10,14);
type
atp=record
y,dis,next:longint;
end;
var tot,c,head,tail,start,finish:longint;
map:array [0..maxm] of atp;
que,first,v:array [0..maxn] of longint;
b:array [0..maxn] of boolean;
u:array [0..maxn] of 0..1;
procedure init;
var i,x,y,dis:longint;
begin
tot:=0;
fillchar(v,sizeof(v),100);
for i:=1 to 7 do read(u[i]);
readln(start,finish);
readln(c);
for i:=1 to c do
begin
readln(x,y,dis);
inc(tot);
map[tot].y:=y;
if u[dis]=1 then map[tot].dis:=diss[dis] shr 1 else map[tot].dis:=diss[dis];
map[tot].next:=first[x];
first[x]:=tot;
inc(tot);
map[tot].y:=x;
if u[dis]=1 then map[tot].dis:=diss[dis] shr 1 else map[tot].dis:=diss[dis];
map[tot].next:=first[y];
first[y]:=tot;
end;
end;
procedure spfa;
var t:longint;
begin
head:=0;
tail:=1;
v[start]:=0;
que[1]:=start;
b[start]:=true;
while head0 do
begin
if v[que[head]]+map[t].dis
哈利波特5 哈利波特與鳳凰社
哈利波特5之鳳凰令 國語配音高畫質收藏版 原 片 名 harry potter and the order of the phoenix 外文別名 harry potter and the order of the phoenix the imax experience usa imax versi...
魔法石之戀
問題描述 在 harry potter and the sorcerer s stone 中，想得到魔法石，必須要通過許許多多的測試和遊戲。現在阿不思 鄧布利多認為這些遊戲都具有魔法力，魔法師們能夠輕鬆的通過，我們要增加一些只能夠通過智力解決的題目，需要真正的聰明人才能夠通過。現在由於我們敬愛的ha...
強聯通 魔法石
任意門 幻象群島是由n個孤立的島嶼構成。島嶼之間有一些殘破的石橋，而橋心的石墩上，就有可能鑲嵌著上古魔法石。約翰尼可以通過這些石橋，從一座島跑到另一座島，如果島上恰好有魔法石，他就可以順便收集。但是由於這些石橋實在是太殘破了，約翰尼經過之後，石橋就會崩塌，不能再次通過。由於約翰尼踩過的部分很快就會崩...