作业帮 > 综合 > 作业

Pascal题(用Turbo Pascal)数码排序

来源:学生作业帮 编辑:百度作业网作业帮 分类:综合作业 时间:2024/05/31 03:47:05
Pascal题(用Turbo Pascal)数码排序
设有n个正整数,将它们连接成一排,组成一个最大的多位整数.例如:当n=3时,三个整数为13,312,343,连成最大整数为:34331213.
帮帮Me吧!
Pascal题(用Turbo Pascal)数码排序
var
i,j,n:integer;
s:string;
a:array[0..100] of integer;
begin
read(n);
for i:=1 to n do
read(a[i]);
for i:=1 to n-1 do
for j:=n downto i+1 do
if a[j-1]