最優佈線問題
time limit:10000ms memory limit:65536k
total submit:116 accepted:95
case time limit:1000ms
description
學校有n臺計算機,為了方便資料傳輸,現要將它們用資料線連線起來。兩台計算機被連線是指它們之間有資料線連線。由於計算機所處的位置不同,因此不同的兩台計算機的連線費用往往是不同的。
當然,如果將任意兩台計算機都用資料線連線,費用將是相當龐大的。為了節省費用,我們採用資料的間接傳輸手段,即一台計算機可以間接的通過若干臺計算機(作為中轉)來實現與另一台計算機的連線。
現在由你負責連線這些計算機,你的任務是使任意兩台計算機都連通(不管是直接的或間接的)。
input
輸入檔案wire.in,第一行為整數n(2<=n<=100),表示計算機的數目。此後的n行,每行n個整數。第x+1行y列的整數表示直接連線第x臺計算機和第y臺計算機的費用。
output
輸出檔案wire.out,乙個整數,表示最小的連線費用。
sample input
30 1 2
1 0 1
2 1 0
sample output
2(注:表示連線1和2,2和3,費用為2)
hint
fillchar(f,sizeof(f),$7f)把所有值賦值為最大
source
elba
varn,i,j,w,ans:longint;
a:array[0..101,0..101] of longint;
b:array[0..1000] of boolean;
min:array[0..1000] of longint;
begin
read(n);
for i:=1 to n do
for j:=1 to n do
read(a[i,j]);
for i:=1 to n do min[i]:=a[1,i];
fillchar(b,sizeof(b),true);
b[1]:=false;
min[0]:=maxlongint;
for i:=2 to n do
begin
w:=0;
for j:=2 to n do
if b[j] then
if min[j]inc(ans,min[w]);
b[w]:=false;
for j:=2 to n do
if b[j] then
if a[w,j]end;
writeln(ans);
end.
最優佈線問題
time limit 1000ms memory limit 65536k 有疑問?點這裡 學校有n臺計算機,為了方便資料傳輸,現要將它們用資料線連線起來。兩台計算機被連線是指它們中間有資料線連線。由於計算機所處的位置不同,因此不同的兩台計算機的連線費用往往是不同的。當然,如果將任意兩台計算機都用資...
最優佈線問題
問題描述 學校有n臺計算機,為了方便資料傳輸,現要將它們用資料線連線起來。兩台計算機被連線是指它們間有資料線連線。由於計算機所處的位置不同,因此不同的兩台計算機的連線費用往往是不同的。當然,如果將任意兩台計算機都用資料線連線,費用將是相當龐大的。為了節省費用,我們採用資料的間接傳輸手段,即一台計算機...
最優佈線問題
問題描述 學校有n臺計算機,為了方便資料傳輸,現要將它們用資料線連線起來。兩台計算機被連線是指它們間有資料線連線。由於計算機所處的位置不同,因此不同的兩台計算機的連線費用往往是不同的。當然,如果將任意兩台計算機都用資料線連線,費用將是相當龐大的。為了節省費用,我們採用資料的間接傳輸手段,即一台計算機...