UC知道NOIP题 谁会
来源：百度知道 编辑：UC知道 时间：2024/05/11 14:27:39
合并果子
【问题描述】
在一个果园里，多多已经将所有的果子打了下来，而且按果子的不同种类分成了不同的堆。
多多决定把所有的果子合成一堆。
每一次合并，多多可以把两堆果子合并到一起，消耗的体力等于两堆果子的重量之和。可以
看出，所有的果子经过n-1次合并之后，就只剩下一堆了。多多在合并果子时总共消耗的体力等于
每次合并所耗体力之和。
因为还要花大力气把这些果子搬回家，所以多多在合并果子时要尽可能地节省体力。假定每
个果子重量都为1，并且已知果子的种类数和每种果子的数目，你的任务是设计出合并的次序方
案，使多多耗费的体力最少，并输出这个最小的体力耗费值。
例如有3种果子，数目依次为1，2，9。可以先将1、2堆合并，新堆数目为3，耗费体力为3。
接着，将新堆与原先的第三堆合并，又得到新的堆，数目为12，耗费体力为12。所以多多总共耗
费体力=3+12=15。可以证明15为最小的体力耗费值。
【输入文件】
输入包括两行，第一行是一个整数n(1<＝n<=10000)，表示果子的种类数。第二行包含n个整
数，用空格分隔，第i个整数ai(1<＝ai<=20000)是第i种果子的数目。
【输出文件】
输出包括一行，这一行只包含一个整数，也就是最小的体力耗费值。输入数据保证这个值小于231。
【问题描述】
在一个果园里，多多已经将所有的果子打了下来，而且按果子的不同种类分成了不同的堆。
多多决定把所有的果子合成一堆。
每一次合并，多多可以把两堆果子合并到一起，消耗的体力等于两堆果子的重量之和。可以
看出，所有的果子经过n-1次合并之后，就只剩下一堆了。多多在合并果子时总共消耗的体力等于
每次合并所耗体力之和。
因为还要花大力气把这些果子搬回家，所以多多在合并果子时要尽可能地节省体力。假定每
个果子重量都为1，并且已知果子的种类数和每种果子的数目，你的任务是设计出合并的次序方
案，使多多耗费的体力最少，并输出这个最小的体力耗费值。
例如有3种果子，数目依次为1，2，9。可以先将1、2堆合并，新堆数目为3，耗费体力为3。
接着，将新堆与原先的第三堆合并，又得到新的堆，数目为12，耗费体力为12。所以多多总共耗
费体力=3+12=15。可以证明15为最小的体力耗费值。
【输入文件】
输入包括两行，第一行是一个整数n(1<＝n<=10000)，表示果子的种类数。第二行包含n个整
数，用空格分隔，第i个整数ai(1<＝ai<=20000)是第i种果子的数目。
【输出文件】
输出包括一行，这一行只包含一个整数，也就是最小的体力耗费值。输入数据保证这个值小于231。
program guozi;
var
n:integer;
a,b:array[1..100] of integer;
i,j,t,s,k:integer;
begin
write('n=');
readln(n);
for i:=1 to n do read(a[i]);
readln;
for i:=1 to n-1 do
for j:=i+1 to n do
if a[i]>a[j] then begin
t:=a[i];
a[i]:=a[j];
a[j]:=t;
end;
s:=0;
i:=0;
repeat
inc(i);
s:=a[i]+a[i+1];
a[i+1]:=s; dec(n);
b[i]:=s;
for j:=i+1 to n-1 do
for k:=j+1 to n do
if a[j]>a[k] then begin
t:=a[j];
a[j]:=a[k];
a[k]:=t;
end;
until n=1;
s:=0;
for j:=1 to i do s:=s+b[j];
writeln(s);
readln
end.
我也是垃圾,呵呵,第一次参加复赛.
这主要是一个排序算法的编写问题
大致算法可以借鉴 堆排序 算法，每次归并最小的两个数（两堆水果）
http://www.vchome.net/tech/datastruct/datasf29.htm
要完成这个具体需求的程序自己写一下吧～