| 记录编号 | 73230 | 评测结果 | AAAAAAAAAA | ||
|---|---|---|---|---|---|
| 题目名称 | 74.[NOIP 2006]明明的随机数 | 最终得分 | 100 | ||
| 用户昵称 | 是否通过 | 通过 | |||
| 代码语言 | Pascal | 运行时间 | 0.001 s | ||
| 提交时间 | 2013-10-20 21:05:40 | 内存使用 | 0.17 MiB | ||
var
n,i,sam,j:integer;
s:array[1..1000] of integer;
begin
assign(input,'random.in');
assign(output,'random.out');
reset(input);
rewrite(output);
readln(n);
for i:=1 to n do
begin
read(j);
if s[j]<>1 then
sam:=sam+1;
s[j]:=1;
end;
writeln(sam);
for i:=1 to 1000 do
if s[i]=1 then
write(i,' ');
close(input);
close(output);
end.