明明想在學校中請一些同學一起做一項問卷調查，為了實驗的客觀性，他先用計算機生成了n個1到1000之間的隨機整數（n≤100），對於其中重複的數字，只保留乙個，把其餘相同的數去掉，不同的數對應著不同的學生的學號。然後再把這些數從小到大排序，按照排好的順序去找同學做調查。請你協助明明完成「去重」與「排序」的工作。
輸入格式：
輸入有2行，第1行為1個正整數，表示所生成的隨機數的個數：
n第2行有n個用空格隔開的正整數，為所產生的隨機數。
輸出格式：
輸出也是2行，第1行為1個正整數m，表示不相同的隨機數的個數。第2行為m個用空格隔開的正整數，為從小到大排好序的不相同的隨機數。
輸入樣例#1：
10輸出樣例#1：20 40 32 67 40 20 89 300 400 15
8noip 2006 普及組 第一題15 20 32 40 67 89 300 400
排序很明顯的一道排序題。所不同的是，本題在排序的基礎上多加了一步去重操作。
我們不要著急去重，先通過排序將序列變為有序，把相同元素排在一起，再進行去重操作，這樣更利於我們解題。
序列有序後，列舉序列中的每乙個元素，與它後面的元素進行比較，如果相同就將當前元素賦值為-1（相當於標記為重複），注意不能賦後面的值，因為後面的值還要和更後面的值進行比較。
最後再掃一遍序列，將值不為-1的元素輸出。
下面附上**。
var
n,c,i:longint;
a:array[1..100] of longint;
procedure qsort(head,tail:longint);
var
i,j,x,t:longint;
begin
i:=head;
j:=tail;
x:=a[random(tail-head+1)+head];
while ido
begin
while a[i]do inc(i);
while xdo dec(j);
if i<=j then
begin
t:=a[i];
a[i]:=a[j];
a[j]:=t;
inc(i);
dec(j);
end;
end;
if headthen qsort(head,j);
if ithen qsort(i,tail);
end;
begin
readln(n);
randomize;
c:=n;
for i:=1 to n do
read(a[i]);
qsort(1,n);
for i:=1 to n-1 do
begin
if a[i]=a[i+1] then
begin
a[i]:=-1;
dec(c);
end;
end;
writeln(c);
for i:=1 to n do
if a[i]<>-1 then write(a[i],' ');
end.
洛谷1059明明的隨機數
給出n個數，從小到大排序，去掉重複的數字，輸出有多少種數字出現了，並輸出這些數字。先快排，然後去重，最後輸出。時間複雜度o n log n var n,m,i longint a,b array 1.100000 of longint procedure qsort l,r longint var ...
明明的隨機數 洛谷 1059
題意 明明想在學校中請一些同學一起做一項問卷調查，為了實驗的客觀性，他先用計算機生成了n個1到1000之間的隨機整數 n 100 對於其中重複的數字，只保留乙個，把其餘相同的數去掉，不同的數對應著不同的學生的學號。然後再把這些數從小到大排序，按照排好的順序去找同學做調查。請你協助明明完成 去重 與 ...
洛谷P1059 明明的隨機數 解題報告
傳送門 題目描述 明明想在學校中請一些同學一起做一項問卷調查，為了實驗的客觀性，他先用計算機生成了n個1到10001000之間的隨機整數 n 100 對於其中重複的數字，只保留乙個，把其餘相同的數去掉，不同的數對應著不同的學生的學號。然後再把這些數從小到大排序，按照排好的順序去找同學做調查。請你協助...