pascal问题求解 (附代码)

有两道题目不会呃

1、 组成最大整数

Description

输入一个n位的正整数，输出由这n个数字组成的最大正整数。

Input

只有一行且只有一个正整数：n位正整数
(1<=n<=30000)

Output

只有一行且只有一个正整数：最大的n位正整数

Sample Input

10243

Sample Output

43210

2、从大到小排序

Description

输入n个正整数，按从大到小的顺序输出。

Input

第一行只有一个正整数：n (1<=n<=400 000)
第二行共有n个正整数，数与数之间用一个空格隔开，每个数据在闭区间[100,700]内

Output

有若干行，每行有10个数据，每个数据占用4个字符位置（最后一行可以少于10个数据）

Sample Input

5 534 657 435 556 587

Sample Output

657 587 556 534 435

Hint

难在数据规模大，数据量有40万之多

要用pascal语言做额！！！

楼上的 你不要自己不会答 就说人家OJ有问题 水平不够就不要过来装逼
第一题:
VAR
ch:char;
a:array[0..9]of word;
i:byte;
BEGIN
while not(eoln) do
begin
read(ch);
inc(a[ord(ch)-48]);
end;
readln;
for i:=9 downto 0 do
while(a[i]>0) do
begin
write(i);
dec(a[i]);
end;
writeln;
END.

一看就是那什么"在线评测系统"的题，连他们自己出的例题都通不过的系统，你还相信它？