CODEVS 2102 石子归并 2

【题目描述 Descriptin】

在一个园形操场的四周摆放N堆石子,现要将石子有次序地合并成一堆.规定每次只能选相邻的2堆合并成新的一堆，并将新的一堆的石子数，记为该次合并的得分。
试设计出1个算法,计算出将N堆石子合并成1堆的最小得分和最大得分.

【输入描述 Input Description】
数据的第1行试正整数N,1≤N≤100,表示有N堆石子.第2行有N个数,分别表示每堆石子的个数.

输出描述 Output Description
输出共2行,第1行为最小得分,第2行为最大得分.

【样例输入 Sample Input】
4
4 4 5 9

【样例输出 Sample Output】

43
54

【解题思路】

经典环形DP，公式大家都懂，最后寻找最大值从f[1,n],f[2,n+1]……等中找

program StongUnion;
var
f1,f2:array[0..100,0..100] of longint;
a,s:array[0..100] of longint;
i,j,p,k,n,ans1,ans2:Longint;
begin
    read(n);
    for i:=1 to n do
    begin
        read(a[i]);
        s[i]:=s[i-1]+a[i];
        a[i+n]:=a[i];
    end;
    for i:=n+1 to 2*n do
    s[i]:=s[i-1]+a[i];

    for p:=1 to n-1 do
        for i:=1 to n*2-p do
        begin
            j:=i+p;
            f1[i,j]:=maxint;;
            f2[i,j]:=0;
            for k:=i to j-1 do
            begin
                if f1[i,j]>f1[i,k]+f1[k+1,j] then
                f1[i,j]:=f1[i,k]+f1[k+1,j];
                if f2[i,j]<f2[i,k]+f2[k+1,j] then
                f2[i,j]:=f2[i,k]+f2[k+1,j];
            end;
            f1[i,j]:=f1[i,j]+s[j]-s[i-1];
            f2[i,j]:=f2[i,j]+s[j]-s[i-1];
        end;
        ans1:=maxlongint div 2;
        ans2:=-1;
        for i:=1 to n do
        begin
            if f1[i,n+i-1]<ans1 then ans1:=f1[i,n+i-1];
            if f2[i,n+i-1]>ans2 then ans2:=f2[i,n+i-1];
        end;
        writeln(ans1);
        writeln(ans2);
end.