回 帖 发 新 帖 刷新版面

主题:谁能帮帮我啊~? 十万火急  要死人的啊~~~~

今天老师抽查啊   去年奥赛复赛的第二题   偶不知道做啊  大家帮帮我啊[em21][em21]
题目是这样滴:

设有n个正整数(n<=20),将其连成一排,组成个最大的多位数。
例如   3  14  15  得31514
输入  n
      n个数
输出  组成的结果

[color=00FF00][/color]有爱心的朋友帮帮我哦  感激不尽

回复列表 (共3个回复)

沙发

program aa;
var
i,j,n,k:integer;
t:string[255];
num:array[1..20]of string[20];
begin
writeln('input n');
readln (n);
writeln('input n ge shu');
for i:=1 to n do readln( num[i]);
for i:=1 to n-1 do
begin
  k:=i;
   for j:=i+1 to n do
   begin
     if num[k]<num[j] then k:=j;
    t:=num[i];num[i]:=num[k];num[k]:=t;
   end;
end;
for i:=1 to n do write(num[i]);
writeln;
end.

板凳

楼上的答案有问题,我试过的[em9]

3 楼

把输入数字当成字符串输入,按字符串大小,降序排列

我来回复

您尚未登录,请登录后再回复。点此登录或注册