codevs天梯 乘积最大

题目：

今年是国际数学联盟确定的“2000——世界数学年”，又恰逢我国著名数学家华罗庚先生诞辰90周年。在华罗庚先生的家乡江苏金坛，组织了一场别开生面的数学智力竞赛的活动，你的一个好朋友XZ也有幸得以参加。活动中，主持人给所有参加活动的选手出了这样一道题目：

 

设有一个长度为N的数字串，要求选手使用K个乘号将它分成K+1个部分，找出一种分法，使得这K+1个部分的乘积能够为最大。

 

同时，为了帮助选手能够正确理解题意，主持人还举了如下的一个例子：

 

有一个数字串：312， 当N=3，K=1时会有以下两种分法：

 

1)  3*12=36

2)  31*2=62

  

   这时，符合题目要求的结果是：31*2=62

 

   现在，请你帮助你的好朋友XZ设计一个程序，求得正确的答案。

分析：

这题应该用dp来做，也可用dfs水过去，状态转移方程：f[j,i]:=max(f[j,i],f[k,i-1]*a[k+1,j]);，i枚举了乘号，j枚举了放乘号位置，k来统计前j-1个位置的最优解。

代码：

const
  maxn=100;


var
  a,f:array [0..maxn,0..maxn] of longint;
  n,m:longint;
  s:string;


function max(a,b:longint):longint;
begin
  if a>b then
    exit(a)
  else
    exit(b);
end;


procedure init;
var
  i,j:longint;
begin
  readln(n,m);
  readln(s);
  for i:=1 to n do
    for j:=i to n do
      a[i,j]:=a[i,j-1]*10+ord(s[j])-48;
  for i:=1 to n do
    f[i,0]:=a[1,i];
end;


procedure main;
var
  i,j,k:longint;
begin
  for i:=1 to m do
    for j:=1 to n do
      begin
        for k:=1 to j-1 do
          if k-i>=0 then
            f[j,i]:=max(f[j,i],f[k,i-1]*a[k+1,j]);
      end;
  writeln(f[n,m]);
end;


begin
  init;
  main;
end.