社区讨论

肿么只有20分？我明明是双重循环

美美利坚共产党
P2671[NOIP 2015 普及组] 求和参与者 5已保存回复 4

讨论操作

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

当前回复
4 条
当前快照
1 份
快照标识符
@mi5hstse
此快照首次捕获于
2025/11/19 12:18
4 个月前
此快照最后确认于
2025/11/19 12:18
4 个月前
查看原帖
CPP
var
 x,y,z,n,m,i:longint;
 num,col:array[0..3000] of longint;
 ans:qword;
begin
 readln(n,m);
 for i:=1 to n do read(num[i]);
 for i:=1 to n do read(col[i]);
 for x:=1 to n-1 do 
  for y:=x+1 to n do begin
   z:=2*y-x;
   if col[x]=col[z] then ans:=(ans+(x+z)*(num[x]+num[z])) mod 10007;
  end;
 writeln(ans);
end.
求大神解答

回复

共 4 条回复，欢迎继续交流。

正在加载回复...