社区讨论
为啥二维能过三维过不了呢?求神犇看一下……
P1855榨取kkksc03参与者 4已保存回复 6
讨论操作
快速查看讨论及其快照的属性,并进行相关操作。
- 当前回复
- 6 条
- 当前快照
- 1 份
- 快照标识符
- @mi4hj1n4
- 此快照首次捕获于
- 2025/11/18 19:23 4 个月前
- 此快照最后确认于
- 2025/11/18 19:23 4 个月前
如题,用二维状态可以AC,可是用三维的状态只有60,输出的数据确实不一样,可是找不出错在哪……求帮忙……
要复赛了时间紧,但是我还是希望各位神犇能花点时间帮我一下……不胜感激
附代码:
三维:
CPPvar 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.
二维:
CPPvar 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 条回复,欢迎继续交流。
正在加载回复...