题目描述 设有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.
转载请注明原文地址: https://ju.6miu.com/read-114280.html