加法最大

加法最大

Time Limit:1000MS  Memory Limit:65536K
Total Submit:105 Accepted:59

Description

设有一个长度为n的数字字符串，分成k+1个部份，使其k+1部份相加的和为最大。例如：数字串'340670'，k=1，其加法有
　　3+40670=40673 34+0670=704 340+670=1010 3406+70=3476 34076+0=34076
其最大和为40676。
问题：当数字串和k给出后，找出一个分法使和为最大。

Input

Output

Sample Input

6 1
340670

Sample Output

40673

Source

elba

var
 i,j,k,p,m,n:longint;
 f:array[0..50,0..50]of longint;
 a:string;


 function make(p,q:longint):longint;
  var
   x,c:longint;
  begin
   val(copy(a,p,q),x,c);
   make:=x;
  end;
begin
 readln(n,m);
 readln(a);
 fillchar(f,sizeof(f),0);
 for i:=1 to n do f[i,1]:=make(1,i);
 for k:=2 to m+1 do
  for i:=k to n do
   for j:=i downto k do
    begin
     p:=make(j,i-j+1);
     if f[i,k]<f[j-1,k-1]+p then f[i,k]:=f[j-1,k-1]+p;
    end;
 write(f[n,m+1]);
end.