洛谷 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

排序找最优解:
1.整数读入,转化成字符串。
2.排序。
3.因为位数长度的关系,要设定很多个判定条件,不过有更简便的方法。
当a[i]+a[j]< a[j]+a[i]的时候,很明显我们就应该将交换,这样排序出来依然是最优解。
时间复杂度:0(n^2)

var
   a:Array [0..21] of string;
   n,x,i,j:longint;
begin
     readln(n);
     for i:=1 to n do
         begin
             read(x);
             str(x,a[i]);
         end;
     for i:=1 to n-1 do
         for j:=i+1 to n do
             if a[i]+a[j]then
                begin
                    a[0]:=a[i];a[i]:=a[j];a[j]:=a[0];
                end;
     for i:=1 to n do write(a[i]);
end.

你可能感兴趣的:(暴力/枚举/模拟,排序&拓扑,pascal)