拼数

题目描述

设有n个正整数（n≤20），将它们联接成一排，组成一个最大的多位整数。

例如：n=3时，3个整数13，312，343联接成的最大整数为：34331213

又如：n=4时，4个整数7，13，4，246联接成的最大整数为：7424613

输入输出格式

输入格式：

第一行，一个正整数n。

第二行，n个正整数。

输出格式：

一个正整数，表示最大的整数

输入输出样

输入样例#1：

313 312 343

var  a:array[-10..210]of ansistring;  i,j,k,n,m:longint;  s,s1,s2:ansistring;function  aa(x,y:ansistring):boolean;var  i,j:longint;begin  aa:=false;  if length(x)>length(y) then j:=length(y)  else j:=length(x);  for i:=1 to j do      if x[i]>y[i] then exit(true)                   else if x[i]<y[i] then exit(false);end;begin  readln(n);;  readln(s);  s:=s+' ';  repeat    inc(i);    j:=pos(' ',s);    a[i]:=copy(s,1,j-1);    delete(s,1,j);  until s='';  for i:=1 to n-1 do    for j:=i+1 to n do      begin        if a[i]+a[j]>a[j]+a[i]  then        begin          a[0]:=a[i];          a[i]:=a[j];          a[j]:=a[0];        end;      end;    for i:=n downto 1 do      begin        write(a[i]);      end;end.

输出样例#1：

343312