- 明明的随机数
- 2012-10-21 09:29:00 @
var
n,x,i:longint;
a:array[1..1000] of longint;
begin
readln(n);
for i:=1 to n do
begin
read(x);
a[x]:=a[x]+1;
end;
for i:=1 to 1000 do
if a[i]>0 then write(i,' ');
end.
4 条评论
-
Jessica_Z LV 8 @ 2015-07-19 22:46:13
少输出一项吧。。。
输出也是2行,【第1行】为1个正整数M,表示不相同的随机数的个数。【第2行】为M个用空格隔开的正整数,为从小到大排好序的不相同的随机数。 -
2015-01-28 20:24:39@
Me too.
-
2014-08-17 23:28:43@
woyeshi
-
2013-12-11 13:10:20@
我也零分
- 1