洛谷 P1012 拼数

题目描述

设有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

分析：
就是一个裸的排序，不是用字典序，而是
例如A,B这样两个数，我们应该判断
A+B>B+A来判断他们的顺序。

代码：

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.