“在一数据库表里输入这些数据在界面上只查询和排序”，我觉得这种方法不好，因为它的字符串和数字是在同一排的，会混淆，看看我的方法吧，我先每排输入一个字符串，再从它里面取成绩和排名，最后进行比较，输出。我先输入学生的人数N，在后面的N排输入字符串，也就是他们的成绩和排名。程序如下：var a:array[1..1000] of longint; x:array[1..1000] of string; i,j,k,n,m,z:longint; s:string;begin readln(n); for i:=1 to n do begin readln(s); s:=s+' '; m:=pos(' ',s); x[i]:=copy(s,1,m-1); j:=m; repeat inc(j); if s[j]=' ' then begin val(copy(s,m+1,j-m-1),z); inc(a[i],z); m:=j; end; until j>length(s); end; for i:=1 to n-1 do for j:=i+1 to n do if a[i] 标签：pascal,帮帮我,程序设计版权声明：文章由 问百书 整理收集，来源于互联网或者用户投稿，如有侵权，请联系我们，我们会立即处理。如转载请保留本文链接：https://www.wenbaishu.com/article/1389.html
