社区讨论

最后一个超时

3321zdq
P2141[NOIP 2014 普及组] 珠心算测验参与者 6已保存回复 6

讨论操作

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

当前回复
6 条
当前快照
1 份
快照标识符
@mi4g793d
此快照首次捕获于
2025/11/18 18:46
4 个月前
此快照最后确认于
2025/11/18 18:46
4 个月前
查看原帖
放源码
CPP
var
 s:array[1..100]of integer;
 y:array[1..10000]of boolean;
 n,a,b:byte;x:integer;
begin
  readln(n);
  for a:=1 to n do read(s[a]);
  fillchar(y,sizeof(y),false);
  for a:=1 to n-1 do
  for b:=a+1 to n do
  y[s[a]+s[b]]:=true;
  b:=0;
  for a:=1 to n do if y[s[a]]=true then inc(b);
  write(b);
end.

回复

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

正在加载回复...