NOIP1998 提高组

[NOIP2002] 提高组

T2.联接数

算法：贪心+字符串处理

[问题分析]：

按整数对应的字符串大到小连接，因为题目的例子都符合，但是不难找到反例：12   121 应该组成12121而非12112,那么是不是相互包含的时候就从小到大呢？也不一定，如：12   123 就是12312而非12123,那么情况就多了。比较的标准应该是这样的：如果a后接b比b后接a大，就说"a>b"。直接输出排序结果。  详见课件的例9

 var
  s:array[..] of string;
  s1:string;
  n,m,i,j:longint;
 begin
  assign(input,'quee.in');reset(input);
  assign(output,'quee.out');rewrite(output);
  readln(n);
  for i:= to n do
   begin
    read(m);
    str(m,s[i]);
   end;
   for i:= to n- do
    for j:=i+ to n do
     if s[i]+s[j]<s[j]+s[i] then
       begin
        s1:=s[i];
        s[i]:=s[j];
        s[j]:=s1;
       end;
   for i:= to n do write(s[i]);
   writeln;
  close(input);close(output);
 end.

参考程序