明明的隨機數
明明想在學校中請一些同學一起做一項問卷調查,為了實驗的客觀性,他先用計算機生成了n個1到1000之間的隨機整數(n≤100),對於其中重複的數字,只保留乙個,把其餘相同的數去掉,不同的數對應著不同的學生的學號。然後再把這些數從小到大排序,按照排好的順序去找同學做調查。請你協助明明完成「去重」與「排序」的工作。
輸入格式:
輸入有2行,第1行為1個正整數,表示所生成的隨機數的個數:
n 第2行有n個用空格隔開的正整數,為所產生的隨機數。
輸出格式:
輸出也是2行,第1行為1個正整數m,表示不相同的隨機數的個數。第2行為m個用空格隔開的正整數,為從小到大排好序的不相同的隨機數。
輸入樣例#1:
1020 40 32 67 40 20 89 300 400 15
輸出樣例#1:
815 20 32 40 67 89 300 400
noip 2006 普及組 第一題
vari,j,k,l,n,m:longint;
a:array[0..1000000,1..2]of longint;
procedure dfs(l,r:longint);//快排排序
vari,j,k,m:longint;
begin
if l>=r then exit;
i:=l;j:=r;m:=a[l+random(r-l+1),1];
repeat
while (a[i,1]m) do dec(j);
if i<=j then begin
k:=a[i,1];a[i,1]:=a[j,1];a[j,1]:=k;
k:=a[i,2];a[i,2]:=a[j,2];a[j,2]:=k;
inc(i);dec(j);
end;
until i>j;
dfs(l,j);
dfs(i,r);
end;
begin
read(n);
for i:=1 to n do begin read(a[i,1]); a[i,2]:=1;end;//輸入
for i:=1 to n do
for j:=i+1 to n do
if a[i,1]=a[j,1] then a[j,2]:=0;//標記去重
randomize;
dfs(1,n);
for i:=1 to n do
if a[i,2]=1 then inc(l);
writeln(l);
for i:=1 to n do
if a[i,2]=1 then write(a[i,1],' ');
end.
明明的隨機數
題目描述 description 明明想在學校中請一些同學一起做一項問卷調查,為了實驗的客觀性,他先用計算機生成了n個1到1000之間的隨機整數 n 100 對於其中重複的數字,只保留乙個,把其餘相同的數去掉,不同的數對應著不同的學生的學號。然後再把這些數從小到大排序,按照排好的順序去找同學做調查。...
明明的隨機數
題目描述 明明想在學校中請一些同學一起做一項問卷調查,為了實驗的客觀性,他先用計算機生成了n個1到1000之間的隨機整數 n 100 對於其中重複的數字,只保留乙個,把其餘相同的數去掉,不同的數對應著不同的學生的學號。然後再把這些數從小到大排序,按照排好的順序去找同學做調查。請你協助明明完成 去重 ...
明明的隨機數
明明想在學校中請一些同學一起做一項問卷調查,為了實驗的客觀性,他先用計算機生成了n個1到1000之間的隨機整數 n 100 對於其中重複的數字,只保留乙個,把其餘相同的數去掉,不同的數對應著不同的學生的學號。然後再把這些數從小到大排序,按照排好的順序去找同學做調查。請你協助明明完成 去重 與 排序 ...