社区讨论

为啥二维能过三维过不了呢?求神犇看一下……

P1855榨取kkksc03参与者 4已保存回复 6

讨论操作

快速查看讨论及其快照的属性,并进行相关操作。

当前回复
6 条
当前快照
1 份
快照标识符
@mi4hj1n4
此快照首次捕获于
2025/11/18 19:23
4 个月前
此快照最后确认于
2025/11/18 19:23
4 个月前
查看原帖
如题,用二维状态可以AC,可是用三维的状态只有60,输出的数据确实不一样,可是找不出错在哪……求帮忙……
要复赛了时间紧,但是我还是希望各位神犇能花点时间帮我一下……不胜感激
附代码:
三维:
CPP
var a,b,c,d,m,n,t:longint;
    f:array[0..100,0..200,0..200] of longint;
    wishes:array[1..100,1..2] of longint;
function max(x,y:longint):longint;
begin
 if x>y then exit(x) else exit(y);
end;
begin
 fillchar(f,sizeof(f),0);
 readln(n,m,t);
 for a:=1 to n do
   readln(wishes[a,1],wishes[a,2]);
 for a:=1 to n do
   for b:=wishes[a,1] to m do
     for c:=wishes[a,2] to t do
       f[a,b,c]:=max(f[a-1,b,c],f[a-1,b-wishes[a,1],c-wishes[a,2]]+1);
 writeln(f[n,m,t]);
end.
二维:
CPP
var a,b,c,d,m,n,t:longint;
    f:array[0..200,0..200] of longint;
    wishes:array[1..100,1..2] of longint;
function max(x,y:longint):longint;
begin
 if x>y then exit(x) else exit(y);
end;
begin
 fillchar(f,sizeof(f),0);
 readln(n,m,t);
 for a:=1 to n do
   readln(wishes[a,1],wishes[a,2]);
 for a:=1 to n do
   for b:=m downto wishes[a,1] do
     for c:=t downto wishes[a,2] do
       f[b,c]:=max(f[b,c],f[b-wishes[a,1],c-wishes[a,2]]+1);
 writeln(f[m,t]);
end.

回复

6 条回复,欢迎继续交流。

正在加载回复...