主题:谁能帮帮我啊~? 十万火急 要死人的啊~~~~
xiaoxiaohai
[专家分:0] 发布于 2005-03-13 09:06:00
今天老师抽查啊 去年奥赛复赛的第二题 偶不知道做啊 大家帮帮我啊[em21][em21]
题目是这样滴:
设有n个正整数(n<=20),将其连成一排,组成个最大的多位数。
例如 3 14 15 得31514
输入 n
n个数
输出 组成的结果
[color=00FF00][/color]有爱心的朋友帮帮我哦 感激不尽
回复列表 (共3个回复)
沙发
feimao2002 [专家分:90] 发布于 2005-03-13 14:18:00
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.
板凳
liurenming [专家分:0] 发布于 2005-03-14 12:17:00
楼上的答案有问题,我试过的[em9]
3 楼
codepk [专家分:2800] 发布于 2005-03-14 13:01:00
把输入数字当成字符串输入,按字符串大小,降序排列
我来回复