社区讨论
求大牛帮忙!
P1982[NOIP 2013 普及组] 小朋友的数字参与者 5已保存回复 12
讨论操作
快速查看讨论及其快照的属性,并进行相关操作。
- 当前回复
- 12 条
- 当前快照
- 1 份
- 快照标识符
- @mi4hk08q
- 此快照首次捕获于
- 2025/11/18 19:24 4 个月前
- 此快照最后确认于
- 2025/11/18 19:28 4 个月前
CPP
var a,b:array[1..100000]of longint;
i,j,k,n,q,p,max:longint;
begin
readln(n,p);
for i:=1 to n do read(a[i]);
for i:=2 to n do
begin
if a[i]<0 then a[i]:=a[i-1];
a[i]:=a[i-1]+a[i];
end;
b[1]:=a[1];
max:=a[1]+b[1];
for i:=2 to n do
begin
b[i]:=max;
if a[i]+b[i]>0 then max:=max+b[i]+a[i];
end;
max:=-maxlongint;
for i:=1 to n do
if b[i]>max then max:=b[i];
write(max mod p);
end.
这题怎么只对了以个数据点?
回复
共 12 条回复,欢迎继续交流。
正在加载回复...