農民約翰被選為他們鎮的鎮長！他其中乙個競選承諾就是在鎮上建立起網際網路，並連線到所有的農場。當然，他需要你的幫助。
約翰已經給他的農場安排了一條高速的網路線路，他想把這條線路共享給其他農場。為了用最小的消費，他想鋪設最短的光纖去連線所有的農場。
你將得到乙份各農場之間連線費用的列表，你必須找出能連線所有農場並所用光纖最短的方案。
每兩個農場間的距離不會超過100000
program name: agrinet
input format
第一行： 農場的個數，n（3<=n<=100）。
第二行..結尾: 後來的行包含了乙個n*n的矩陣,表示每個農場之間的距離。理論上，他們是n行，每行由n個用空格分隔的數組成，實際上，他們限制在80個字元，因此，某些行會緊接著另一些行。當然，對角線將會是0，因為不會有線路從第i個農場到它本身。
sample input (file agrinet.in)
40 4 9 21
4 0 8 17
9 8 0 16
21 17 16 0
output format
只有乙個輸出，其中包含連線到每個農場的光纖的最小長度。
sample output (file agrinet.out)
28題解：
經典的mst--prim演算法
複習prim專用.
1var2
n,i,j,dc,da,k:longint;
3 cost:array[0..1001,0..1001] of
longint;
4 f,p:array[0..1001] of
longint;
5begin
6read(n);
7 for i:=1
to n do
8 for j:=1
to n do
9read(cost[i,j]);
10(*
)---prim----(
*)11 for i:=1
to n do
12begin
13 f[i]:=cost[1
,i];
14 p[i]:=1
;15 end; //init();
16 for i:=1
to n do
17begin
18 dc:=11101116
;19 for j:=1
to n do
20if (f[j]0
) then
21begin
22 dc:=f[j];
23 k:=j;
24end;
25 f[k]:=0
;26 for j:=1
to n do
27if cost[k,j]28begin
29 f[j]:=cost[k,j];
30 p[j]:=k;
31end;
32end;
33 for i:=2
to n do
34inc(da,cost[i,p[i]]);
35writeln(da);
36 end.
AcWing 1140 最短網路
題目鏈結 給出n個點，並給出所有點之間的距離，本質就是求一張無向連通圖的最小生成樹 從題目來看，這題的資料是保證有解的，還有按照輸入格式來看，這應該是稠密圖，使用鄰接矩陣來儲存圖 直接套用prim演算法就行了 include include using namespace std const int...
COGS 831 最短網路
輸入檔案 agrinet.in輸出檔案 agrinet.out簡單對比 時間限制 1 s 記憶體限制 128 mb 農民約翰被選為他們鎮的鎮長！他其中乙個競選承諾就是在鎮上建立起網際網路，並連線到所有的場。當然，他需要你的幫助。約翰已經給他的農場安排了一條高速的網路線路，他想把這條線路共享給其他農場...
AcWing 1140 最短網路
農夫約翰被選為他們鎮的鎮長！他其中乙個競選承諾就是在鎮上建立起網際網路，並連線到所有的農場。約翰已經給他的農場安排了一條高速的網路線路，他想把這條線路共享給其他農場。約翰的農場的編號是1，其他農場的編號是 2 n.為了使花費最少，他希望用於連線所有的農場的光纖總長度盡可能短。你將得到乙份各農場之間連...