Tyvj P1130 奖学金
(07年普及组第一题)
奖学金
(scholar.pas/c/cpp)
【问题描述】
某小学最近得到了一笔赞助,打算拿出其中一部分为学习成绩优秀的前5名学生发奖学金。期末,每个学生都有3门课的成绩:语文、数学、英语。先按总分从高到低排序,如果两个同学总分相同,再按语文成绩从高到低排序,如果两个同学总分和语文成绩都相同,那么规定学号小的同学 排在前面,这样,每个学生的排序是唯一确定的。
任务:先根据输入的3门课的成绩计算总分,然后按上述规则排序,最后按排名顺序输出前五名名学生的学号和总分。注意,在前5名同学中,每个人的奖学金都不相同,因此,你必须严格按上述规则排序。例如,在某个正确答案中,如果前两行的输出数据(每行输出两个数:学号、总分) 是:
7 279
5 279
这两行数据的含义是:总分最高的两个同学的学号依次是7号、5号。这两名同学的总分都是 279 (总分等于输入的语文、数学、英语三科成绩之和) ,但学号为7的学生语文成绩更高一些。如果你的前两名的输出数据是:
5 279
7 279
则按输出错误处理,不能得分。
【输入】
输入文件scholar.in包含n+1行:
第1行为一个正整数n,表示该校参加评选的学生人数。
第2到n+1行,每行有3个用空格隔开的数字,每个数字都在O到100之间z第1行的3个数 字依次表示学号为j-1的学生的语文、数学、英语的成绩。每个学生的学号按照输入顺序编号为l~n (恰好是输入数据的行号减1)。
所给的数据都是正确的,不必检验。
【输出】
输出文件scholar.out共有5行,每行是两个用空格隔开的正整数,依次表示前5名学生的学号和总分。
【输入输出样例1】
scholar.in | scholar.out |
6 90 67 80 87 66 91 78 89 91 88 99 77 67 89 64 78 89 98 | 6 265 4 264 3 258 2 244 1 237 |
【输入输出样例2】
scholar. in | scholar. out |
8 80 89 89 88 98 78 90 67 80 87 66 91 78 89 91 88 99 77 67 89 64 78 89 98 | 8 265 2 264 6 264 1 258 5 258 |
【限制】
50%的数据满足:各学生的总成绩各不相同 100%的数据满足: 6<=n<=300
program puji2007t1; var n,i,j:integer; yw,sx,yy,t,no:array[1..300]of integer; procedure swap(x,y:integer); var tot:integer; begin tot:=t[x];t[x]:=t[y];t[y]:=tot; tot:=no[x];no[x]:=no[y];no[y]:=tot; tot:=yw[x];yw[x]:=yw[y];yw[y]:=tot; end; begin read (n); for i := 1 to n do begin no[i]:=i; read (yw[i],sx[i],yy[i]); t[i]:=yw[i]+sx[i]+yy[i]; end; for i := 1 to n do for j := 1 to n do begin if t[i]>t[j]then swap(i,j); if t[i]=t[j]then begin if yw[i]>yw[j]then swap(i,j); if yw[i]=yw[j]then if no[i]<no[j]then swap(i,j); end; end; for i := 1 to 5 do writeln(no[i],' ',t[i]); end.