哭...记忆化写的太丑了,不过还是过了

感谢日文大牛。。。

其绝对值不大于104 骗人的

中间三个点没过的话，开int64

编译通过...

├ 测试数据 01：答案正确... 0ms

├ 测试数据 02：答案正确... 0ms

├ 测试数据 03：答案错误...程序输出比正确答案长

├ 测试数据 04：答案错误...程序输出比正确答案长

├ 测试数据 05：答案正确... 0ms

---|---|---|---|---|---|---|---|-

Unaccepted 有效得分：60 有效耗时：0ms

program f;

var

n,m,i,j,k,p,t,l,max,min:integer;

s,a:array[1..50,1..50,1..9] of int64;

w:array[1..100] of integer;

b:array[0..100,0..100] of integer;

begin

readln(n,m);fillchar(b,sizeof(b),0);fillchar(a,sizeof(a),0);fillchar

(s,sizeof(s),0);

for i:=1 to n do

for k:=1 to m do

for j:=k to n do s:=maxlongint;

for i:=1 to n do begin read(w[i]);w:=w[i];end;

for i:=1 to n do

for j:=1 to n-m+1 do

begin

b:=(b+(w mod 10)+10) mod 10;

a:=b;s:=b;

end;

for t:=2 to m do

for k:=t to n-m+t do

for i:=1 to n do

for p:=1 to t-1 do

for l:=p to k+p-t do

begin

if i+ln then begin max:=a*a[(i+l) mod n,k-l,t-

p];min:=s*s[(i+l) mod n,k-l,t-p];end

else begin max:=a*a; min:=s*s

;end;

if max>a then a:=max;

if minmax then max:=a;

if s

多谢楼上那位20-40-60-100 的仁兄，要不我死活也不知道怎么把我的60分变成100。

what?稀里糊涂的就过了...

由于数据范围较小，故可以考虑O(n^2*m^2)的算法，把不同的环分情况DP，读入的时候 readln(ap[i]);

ap[i]:=(ap[i]+10000) mod 10;

f为1-i分成k各部分的最值。

if pmin>fmin[j,k-1]*((a[i]-a[j]) mod 10) then pmin:=fmin[j,k-1]*((a[i]-a[j]) mod 10);

if pmax

阶段（P）：分成P部分

状态（I，J）：第i到j间分成P部分的最大、最小值

决策（K）：Ai..Ak分成P-1部分，Ak+1..N分成1部分的最大、最小值

动态转移方程：

Fmax=max{Fmax2*A[K+1,N]};

Fmin=min{Fmin2*A[K+1,N]};

一次性AC

竟然忘了负数取模，调了好久。这是普及组啊，有点害怕……

数据范围这么小，一看就像普及组的。。

{f表示前 i 个 切 j 次 f:=min{f[k,j-1]*deal(s[i]-s[k])}(1

终于，终于

在这题上过了我的第80题了！

··

要哭了

·我要感谢TVB。CCTV,MTV,,亚洲卫视，，BBC···

我是超级大牛！我是王哲明大牛！！哈哈哈

还有谁比我牛？

我用32767得80分

用maxlongint得40分。。。。。。。。。。。。。。。。。。。。。。

原来是int64啊

O(n^3*m)算法。。。。。。

处理环时只需放入数组两遍即可！用循环数组在mod时容易出错，而且复杂度较高！

处理和时用前缀和比较方便！而且最快！

。。。。。。。。。。。。。

这道题对我们这种初学者不简单啊，这可恶的题，10^4却写104，我足足在这里栽了3次，吸取经验

O(n^3m)...

呵呵！我们圈内将这一类Ｆ［Ｉ，Ｊ］＝Ｆ［Ｉ，Ｋ］％Ｗ［Ｋ＋１，Ｊ］类型的称之为　毛里求斯算法啊！！！

动态规划最重要的就是边界条件，边界初始化一定要注意，边界不为零的问题一定要注意，先初始化，在递推过程中用到的中间值必须都已赋值（初始化），否则极易出现错误，我就是因为这个挂了3次

f(i,j) = max{f(i,k) * digit(k,j)}