人類終於登上了火星的土地並且見到了神秘的火星人。人類和火星人都無法理解對方的語言，但是我們的科學家發明了一種用數字交流的方法。這種交流方法是這樣的，首先，火星人把乙個非常大的數字告訴人類科學家，科學家破解這個數字的含義後，再把乙個很小的數字加到這個大數上面，把結果告訴火星人，作為人類的回答。
火星人用一種非常簡單的方式來表示數字——掰手指。火星人只有乙隻手，但這只手上有成千上萬的手指，這些手指排成一列，分別編號為1，2，3……
。火星人的任意兩根手指都能隨意交換位置，他們就是通過這方法計數的。
乙個火星人用乙個人類的手演示了如何用手指計數。如果把五根手指——拇指、食指、中指、無名指和小指分別編號為1，2，3，4和5，當它們按正常順序排列時，形成了5位數12345，當你交換無名指和小指的位置時，會形成5位數12354，當你把五個手指的順序完全顛倒時，會形成54321，在所有能夠形成的120個5位數中，12345最小，它表示1；12354第二小，它表示2；54321最大，它表示120。下表展示了只有3根手指時能夠形成的6個3位數和它們代表的數字：
三進製數
123
132
213
231
312
321
代表的數字1
2 3
4 5
6 現在你有幸成為了第乙個和火星人交流的地球人。乙個火星人會讓你看他的手指，科學家會告訴你要加上去的很小的數。你的任務是，把火星人用手指表示的數與科學家告訴你的數相加，並根據相加的結果改變火星人手指的排列順序。輸入資料保證這個結果不會超出火星人手指能表示的範圍。
分析：題目很長看上去很複雜，其實本意就是指火星人每個手指所擺的數都代表這乙個數字，在加上所給值後，再轉化為火星人所用的數字。資料很小直接用模擬。
constmaxn=10000;
var n,m:integer;
a:array[1..maxn] of integer;
procedure qsort(l,r:longint);
var i,j,k,t:integer;
begin
if l>r then exit;
i:=l;
j:=r;
k:=a[(i+j) div 2];
repeat
while a[i]k do dec(j);
if i<=j then
begin
t:=a[i];
a[i]:=a[j];
a[j]:=t;
inc(i);
dec(j);
end;
until i>j;
qsort(i,r);
qsort(l,j);
end;
procedure print;
var i:integer;
begin
for i:=1 to n do
write(a[i],' ');
writeln;
end;
procedure main;
var i,j,r,p,k,t:integer;
begin
readln(n);
readln(m);
for i:=1 to n do
read(a[i]);
for i:=1 to m do
begin
j:=n;
while a[j]a[j-1]) then
p:=k;
t:=a[p];
a[p]:=a[j-1];
a[j-1]:=t;
qsort(j,n);
end;
print;
end;
begin
main;
end.
火星人計數法
問題描述 火星人用一種非常簡單的方式來表示數字 掰手指。火星人只有乙隻手，但這只手上有成千上萬的手指，這些手指排成一列，分別編號為1，2，3 火星人的任意兩根手指都能隨意交換位置，他們就是通過這方法計數的。乙個火星人用乙個人類的手演示了如何用手指計數。如果把五根手指 拇指 食指 中指 無名指和小指分...
火星人的研究 Prefix
題意 對乙個字串實現三種操作 q i j 詢問該字串的字尾i和字尾j的最長公共字首長度 r i c 將當前字串第i位變為小寫字母c i i c 在當前字串第i位後插入乙個小寫字母c 輸入 輸入檔案第一行為乙個字串 僅包含小寫字母 接下來的一行的整數q 代表操作的個數 1 q 15000 接下來q 行...
洛谷1088 火星人
人類終於登上了火星的土地並且見到了神秘的火星人。人類和火星人都無法理解對方的語言，但是我們的科學家發明了一種用數字交流的方法。這種交流方法是這樣的，首先，火星人把乙個非常大的數字告訴人類科學家，科學家破解這個數字的含義後，再把乙個很小的數字加到這個大數上面，把結果告訴火星人，作為人類的回答。火星人用...