国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 學院 > 開發設計 > 正文

P1093 獎學金

2019-11-14 10:03:34
字體:
來源:轉載
供稿:網友

題目描述

先按每個學生總分從高到低排序,如果兩個同學總分相同,再按語文成績從高到低排序,如果兩個同學總分和語文成績都相同,那么規定學號小的同學排在前面。依次表示前5名學生的學號和總分。

樣例輸入

690 67 8087 66 9178 89 9188 99 7767 89 6478 89 98

樣例輸出

6 2654 2643 2582 2441 237

思路

O(5n)按題意排序,只需要保留前五名。var i,j,k,l,m,n,z:longint; a,b,c:array[1..5] of longint;begin readln(l); for i:=1 to l do begin readln(m,n,z); z:=z+n+m; k:=6; for j:=1 to 5 do if z>=a[k-1] then if z=a[k-1] then begin if m>c[k-1] then dec(k) else if (m=c[k-1])and(i<b[k-1])or(b[k-1]=0) then dec(k); end else dec(k); if k<=5 then begin for j:=5 downto k+1 do begin a[j]:=a[j-1]; b[j]:=b[j-1]; c[j]:=c[j-1]; end; a[k]:=z; b[k]:=i; c[k]:=m; end; end; for i:=1 to 5 do writeln(b[i],' ',a[i]);end.
發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
主站蜘蛛池模板: 电白县| 伊金霍洛旗| 当雄县| 绥德县| 大厂| 鄂尔多斯市| 澄城县| 龙山县| 贵南县| 桐乡市| 淳化县| 济阳县| 资中县| 固阳县| 东阳市| 佛冈县| 宣威市| 江口县| 石门县| 上杭县| 泽库县| 婺源县| 余干县| 安西县| 锡林郭勒盟| 普兰店市| 琼中| 东阳市| 佛山市| 二手房| 太谷县| 宁河县| 厦门市| 渑池县| 石门县| 即墨市| 神木县| 全州县| 偏关县| 遂平县| 常德市|