ssl1612 最優佈線問題

2021-07-29 12:32:40 字數 1473 閱讀 2679

最優佈線問題

time limit:10000ms  memory limit:65536k

total submit:132 accepted:105 

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

3

0 1 2

1 0 1

2 1 0

sample output

2(注:表示連線1和2,2和3,費用為2)

hint

fillchar(f,sizeof(f),$7f)把所有值賦值為最大

source

elba

var

a:array[0..100,0..100]of longint;

l:array[0..100]of longint;//到某個點的費用的最小值

v:array[0..100]of boolean;//true為可加入,false為不可加入(都在裡面了還加入什麼)

n,i,j,k,ans:longint;

begin

readln(n);

for i:=1 to n do

begin

for j:=1 to n do read(a[i,j]);

readln;

end;

fillchar(v,sizeof(v),true);//一開始什麼都沒有,全都能加入

fillchar(l,sizeof(l),$7f);//初始化為maxint

l[1]:=0;//連第乙個點的費用為0

for i:=1 to n do

begin

k:=0;

for j:=1 to n do//找目前可以連得到,而且費用最小的點

if (l[j]

最優佈線問題 SSL 1612

description 學校有n臺計算機,為了方便資料傳輸,現要將它們用資料線連線起來。兩台計算機被連線是指它們之間有資料線連線。由於計算機所處的位置不同,因此不同的兩台計算機的連線費用往往是不同的。當然,如果將任意兩台計算機都用資料線連線,費用將是相當龐大的。為了節省費用,我們採用資料的間接傳輸手...

SSL 1612 最優佈線問題(最小生成樹)

description 學校有n臺計算機,為了方便資料傳輸,現要將它們用資料線連線起來。兩台計算機被連線是指它們之間有資料線連線。由於計算機所處的位置不同,因此不同的兩台計算機的連線費用往往是不同的。當然,如果將任意兩台計算機都用資料線連線,費用將是相當龐大的。為了節省費用,我們採用資料的間接傳輸手...

SSL 1612 最優佈線問題(最小生成樹)

description 學校有n臺計算機,為了方便資料傳輸,現要將它們用資料線連線起來。兩台計算機被連線是指它們之間有資料線連線。由於計算機所處的位置不同,因此不同的兩台計算機的連線費用往往是不同的。當然,如果將任意兩台計算機都用資料線連線,費用將是相當龐大的。為了節省費用,我們採用資料的間接傳輸手...