Description
跟所有人一樣，農夫約翰以着寧教我負天下牛，休叫天下牛負我的偉大精神，日日夜夜苦思生財之道。爲了發財，他設置了一系列的規章制度，使得任何一隻奶牛在農場中的道路行走，都要向農夫約翰上交過路費。
農場中由N（1 <= N <= 250）片草地（標號爲1到N），並且有M（1 <= M <= 10000）條雙向道路連接草地A_j和B_j（1 <= A_j <= N; 1 <= B_j <= N）。奶牛們從任意一片草地出發可以抵達任意一片的草地。FJ已經在連接A_j和B_j的雙向道路上設置一個過路費L_j（1 <= L_j <= 100,000）。
可能有多條道路連接相同的兩片草地，但是不存在一條道路連接一片草地和這片草地本身。最值得慶幸的是，奶牛從任意一篇草地出發，經過一系列的路徑，總是可以抵達其它的任意一片草地。
除了貪得無厭，叫獸都不知道該說什麼好。FJ竟然在每片草地上面也設置了一個過路費C_i（1 <= C_i <= 100000）。從一片草地到另外一片草地的費用，是經過的所有道路的過路費之和，加上經過的所有的草地（包括起點和終點）的過路費的最大值。
任勞任怨的牛們希望去調查一下她們應該選擇那一條路徑。她們要你寫一個程序，接受K（1<= K <= 10,000）個問題並且輸出每個詢問對應的最小花費。第i個問題包含兩個數字s_i和t_i（1 <= s_i <= N; 1 <= t_i <= N; s_i != t_i），表示起點和終點的草地。
考慮下面這個包含5片草地的樣例圖像:
從草地1到草地3的道路的“邊過路費”爲3，草地2的“點過路費”爲5。
要從草地1走到草地4，可以從草地1走到草地3再走到草地5最後抵達草地4。如果這麼走的話，需要的“邊過路費”爲2+1+1=4，需要的點過路費爲4（草地5的點過路費最大），所以總的花費爲4+4=8。
而從草地2到草地3的最佳路徑是從草地2出發，抵達草地5，最後到達草地3。這麼走的話，邊過路費爲3+1=4，點過路費爲5，總花費爲4+5=9。
Input
* 第1行: 三個空格隔開的整數: N, M和K
* 第2到第N+1行: 第i+1行包含一個單獨的整數: C_i
* 第N+2到第N+M+1行: 第j+N+1行包含3個由空格隔開的整數: A_j, B_j和L_j
* 第N+M+2倒第N+M+K+1行: 第i+N+M+1行表示第i個問題，包含兩個由空格隔開的整數s_i和t_i
Output
* 第1到第K行: 第i行包含一個單獨的整數，表示從s_i到t_i的最小花費。
Sample Input
5 7 2
2
5
3
3
4
1 2 3
1 3 2
2 5 3
5 3 1
5 4 1
2 4 3
3 4 4
1 4
2 3
Sample Output
8
9
Data Constraint
題解：
本題是floyd(N^3的極限爲15625000，不會超時)
本題與普通的floyd的不同點在於:它不僅邊有權值，它的點也有權值。對於這一點，我們可以設兩個數組，一個是不帶過路費的數組，用於走floyd；另一個數組則是答案，可用前一個數組+經過點的最大值來更新
對於過路費，當然是越少越好啦，所以我們在開頭就選排一下過路費即可。經過點爲i,k,j：i爲起點，k爲中轉點，j爲終點。在更新f[i,j]時要用max函數選a[i],a[j],a[k]的最大值。
var
f,u:array[1..250,1..250]of longint;
a:array[0..250,1..2]of longint;
c:array[1..250]of longint;
n,m,b,i,j,k,o,x,y,z:longint;
function max(a,b:longint):longint;
begin
if a>b then exit(a);
exit(b);
end;
function min(a,b:longint):longint;
begin
if a<b then exit(a);
exit(b);
end;
begin
read(n,m,b);
for i:=1 to n do
begin
read(c[i]);
a[i,1]:=c[i];
a[i,2]:=i;
end;
for i:=1 to n-1 do//選排出過路費小的點在前
for j:=i+1 to n do
if a[i,1]>a[j,1] then begin a[0]:=a[i]; a[i]:=a[j]; a[j]:=a[0]; end;
for i:=1 to n do
for j:=1 to n do
if i<>j then
begin
f[i,j]:=233333333;
u[i,j]:=f[i,j];
end
else f[i,i]:=c[i];//自己到自己，至少也要交過路費~
for i:=1 to m do
begin
read(x,y,z);
u[x,y]:=min(u[x,y],z);//要最小的（之前沒加個，沒了50分/(ㄒoㄒ)/~~）
u[y,x]:=u[x,y];
end;
for o:=1 to n do
begin
k:=a[o,2];
for i:=1 to n do
for j:=1 to n do
if (i<>j) and (i<>k) and (j<>k) then
begin
u[i,j]:=min(u[i,k]+u[k,j],u[i,j]);
f[i,j]:=min(u[i,j]+max(c[k],max(c[i],c[j])),f[i,j]);
end;
end;
for i:=1 to b do
begin
read(x,y);
writeln(f[x,y]);
end;
end.