首页 > 试题广场 >

输入n个0到100之间的整数，由小到大排序输出，每行输出8个

[填空题]

输入n个0到100之间的整数，由小到大排序输出，每行输出8个

程序清单：

program chu1;
var i,j,k,n,x:integer;
    b:array[0..100]of integer;
begin
    readln(n);
    for i:=0 to 100 do b[i]:=0;
    for i:=1 to n do
    begin
        readln(x);
        b[x]:= 1
    end;
      2
    for i:=0 to 100 do
       while 3  do
       begin
           write(   4  )；
           k:=k+1;
           b[i]:=b[i]-1;
           if   5   then writeln;
       end;
    readln;
end.

查看正确选项