8 8 兩人過橋bridge 2529

有n個人希望在晚上通過一座橋。在任何時刻，最多只能有兩個人在橋上，並且必須要帶著手電筒才能通過橋。現在的麻煩是只有乙個手電筒，所以必須安排某種順序，使得手電筒可以被帶回去讓更多的人過橋（手電筒必須由人帶回，不可以從對岸扔過去）。每個人都有不同的過橋時間，兩個人一起過橋所用的時間等於其中較慢的乙個。你的任務是要找出能在最短時間內使所有人都過橋的方案。

40%的資料滿足：n<=100；

100%的資料滿足：n<=1000

樣例讀入樣例輸出 4 17 1 2

5 10

可以先讓1和2過橋，然後1回來，讓5和10過橋，然後2再回來帶1一起過橋，時間為：2+1+10+2+2=17。

貪心，先排序

有兩種策略，每次取效率最高的：

1.讓最快的人來回帶

2.先讓最快和次快的人過去，然後最快回來，最慢和次慢過去，次快單獨回來，帶最快過去

從小到大做和從大到小做都可以，從小到大要保持手電筒、最快和次快在右邊，從大到小則保持手電筒、最快和次快在左邊

時間複雜度o(n)

|     |
左邊 | | 右邊
（起點） | | （終點）
| |

從大到小

var
n,i,ans:longint;
a:array[1..1000]of longint;
procedure
qsort
(l,r:longint);
var i,j,key,t:longint;
begin
if l>=r then
exit;
i:=l;j:=r;
key:=a[(l+r) div
2]; repeat
while a[i]do inc(i);
while a[j]>key do dec(j);
if i<=j then
begin
t:=a[i];a[i]:=a[j];a[j]:=t;
inc(i);dec(j);
end;
until i>j;
qsort(i,r);
qsort(l,j);
end;
function
min(a,b:longint):longint;
begin
if athen
exit(a) else
exit(b);
end;
begin
readln(n);
for i:=1
to n do
readln(a[i]);
qsort(1,n);
while n>3
dobegin 
ans:=ans+min(a[1]*2+a[n]+a[n-1],a[n]+a[2]*2+a[1]);
n:=n-2;
end;
if n=3
then ans:=ans+a[1]+a[2]+a[3]
else ans:=ans+a[n];
writeln(ans);
end.

從小到大

var
n,i:longint;
a,f:array[1..1000]of longint;
procedure
qsort
(l,r:longint);
var i,j,key,t:longint;
begin
if l>=r then
exit;
i:=l;j:=r;
key:=a[(l+r) div
2]; repeat
while a[i]do inc(i);
while a[j]>key do dec(j);
if i<=j then
begin
t:=a[i];a[i]:=a[j];a[j]:=t;
inc(i);dec(j);
end;
until i>j;
qsort(i,r);
qsort(l,j);
end;
function
min(a,b:longint):longint;
begin
if athen
exit(a) else
exit(b);
end;
begin
readln(n);
for i:=1
to n do
readln(a[i]);
qsort(1,n);
f[1]:=a[1];f[2]:=a[2];
for i:=3
to n do
f[i]:=min(f[i-1]+a[i]+a[1],f[i-2]+a[i]+a[1]+a[2]*2);
writeln(f[n]);
end.

8 8 兩人過橋bridge 2529

益智兩人過橋問題

兩人結對作業

兩人合作經過此

8 8 兩人過橋bridge 2529

益智 兩人過橋問題

兩人結對作業

兩人合作經過此

相關推薦

益智兩人過橋問題