记录编号	20504	评测结果	AAAAAAAAAA
题目名称	整理书本	最终得分	100
用户昵称	1102	是否通过	通过
代码语言	Pascal	运行时间	2.596 s
提交时间	2010-10-26 16:25:44	内存使用	1.94 MiB

program xxxx;
var n,i,j,k,l,x,y,max:longint;
    a,b:array[1..400] of longint;
    f:array[1..400,1..400,1..3] of longint;
begin
  assign(input,'book.in');
  reset(input);
  assign(output,'book.out');
  rewrite(output);
  readln(n);
  for i:=1 to n do
    readln(a[i],b[i]);
  for i:=1 to n do
    begin
      f[i,i,1]:=0;
      f[i,i,2]:=a[i];
      f[i,i,3]:=b[i];
    end;
  for i:=1 to n do
    for j:=1 to n do
      if i+j<=n then
        begin
          max:=maxlongint;
          for k:=j to i+j-1 do
            begin
              if (f[j,k,2]-f[j,k,3]+f[k+1,i+j,2]-f[k+1,i+j,3]+f[j,k,1]+f[k+1,i+j,1])<max then
                begin
                  max:=f[j,k,2]-f[j,k,3]+f[k+1,i+j,2]-f[k+1,i+j,3]+f[j,k,1]+f[k+1,i+j,1];
                  x:=f[j,k,2]+f[k+1,i+j,2];
                  y:=f[j,k,3]+f[k+1,i+j,3];
                end;
            end;
          f[j,i+j,1]:=max;
          f[j,i+j,2]:=x;
          f[j,i+j,3]:=y;
        end;
  writeln(f[1,n,1]);
  close(input);
  close(output);
end.