编译通过...

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

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

Accepted 有效得分：100 有效耗时：0ms

var

f:array[1..20,1..20,1..20]of longint;

a,b,c,i,j,k:longint;

function make(i,j,k:longint):longint;

begin

if(i

编译通过...

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

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

Accepted 有效得分：100 有效耗时：0ms

lemon_cn说的太重要了...

这道破题,害我郁闷许久

而且,给的错误信息根本不对,让人很摸不着头脑.

菜鸟我第一次作记忆化，还不错，在此留个纪念！！

在瑞~~~~~牛的指导下，终于AC了

递推+记忆化...输出时注意，有空格……

我已经记不清提交了几遍……我好弱

for(i=0;i

编译通过...

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

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

Accepted 有效得分：100 有效耗时：0ms

Pass，无视此题，无聊。。

编译通过...

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

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

Accepted 有效得分：100 有效耗时：0ms

考格式的题目...WS...

此题只知道可以递推或记忆化就行了,输出恶心(而且无意义),大家可以pass.

编译通过...

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

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

Accepted 有效得分：100 有效耗时：0ms

怎么才一个数据

记忆化搜索：

同样用递归，

只是在每次递归时用数组记录结果

由于共有20^3个状态，所以三维数组可以采用

标准记忆化搜索❀~ 数据范围-100~100 输出结果longint之内 每个字符间有空格要注意！ 弱弱的问下 记忆化搜索是不是也是DP的一部分= =~

……太阳

这题目难度竟然2？？、

1都给难了。。靠，，

1个月 31遍提交后AC 舍我其谁！！！！！！！！

这个题太无聊了 像javran牛说的一样 大家pass！

var

f:array[-1..50,-1..50,-1..50] of longint;

function w(a,b,c:longint):longint;

begin

w:=0;if f[a,b,c]0 then exit(f[a,b,c]);if (a20) then

begin exit(w(20,20,20));end;

if (a

如果出现小于零的就输出1

else 如果有其一 > 20 则输出w(20,20,20)

注意先后顺序，WA了n次......

这题我彻底无语...

甚矣，汝之描述不清...

编译通过...

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

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

Accepted 有效得分：100 有效耗时：0ms

题目坑人啊

题目不难，但要注意输出格式

以下是我的输出代码

aa:=a[i];bb=b[i];cc=c[i];

if a[i]20

then begin

aa=20;bb=20;cc=20;

end;

ans[i]=w[aa][bb][cc];

输出 'w(',a[i],', ',b[i],', ',c[i],') = ',ans[i]

编译通过...

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

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

Accepted 有效得分：100 有效耗时：0ms

暈,我竟然把遞推式抄錯了

var

a,b,c,f:integer;

function w(a,b,c:integer):longint;

begin

if (a20)

then w:=w(20,20,20)

else if(a