拼数

题目描述
设有n个正整数（n≤20），将它们联接成一排，组成一个最大的多位整数。
例如：n=3时，3个整数13，312，343联接成的最大整数为：34331213
又如：n=4时，4个整数7，13，4，246联接成的最大整数为：7424613

输入输出格式
输入格式：
第一行，一个正整数n。
第二行，n个正整数。

输出格式：
一个正整数，表示最大的整数

输入输出样例
输入样例#1：
3
13 312 343
输出样例#1：
34331213

说明
这一题包含排序和字符串处理，主要是字符串处理，因为它是在同一行输入，所以要用长整形输入再转换为字符串。

---

var
  n,i,j:longint;
  t:string;
  a:array[1..100] of longint;
  b:array[1..100] of string;
begin
  readln(n);
  for i:=1 to n do
  begin
    read(a[i]);
    str(a[i],b[i]);
  end;
  for i:=1 to n-1 do
    for j:=i+1 to n do
      if b[i]+b[j]<b[j]+b[i] then 
      begin 
        t:=b[i];b[i]:=b[j];b[j]:=t;
      end;
  for i:=1 to n do
    write(b[i]);
end.