haihongyuan.com
海量文库 文档专家
全站搜索:
您现在的位置:首页 > 初中教育 > 学科竞赛学科竞赛

谁拿了最多奖学金

发布时间:2013-12-18 12:31:38  

谁拿了最多奖学金

【问题描述】某校的惯例是在每学期的期末考试之后发放奖学金。发放的奖学金共有五种,获取的条件各自不同:

1)院士奖学金,每人8000元,期末平均成绩高于80分(>80),并且在本学期内发表1篇或1篇以上论文的学生均可获得;

2)五四奖学金,每人4000元,期末平均成绩高于85分(>85),并且班级评议成绩高于80分(>80)的学生均可获得;

3)成绩优秀奖,每人2000元,期末平均成绩高于90分(>90)的学生均可获得;

4)西部奖学金,每人1000元,期末平均成绩高于85分(>85)的西部省份学生均可获得;

5)班级贡献奖,每人850元,班级评议成绩高于80分(>80)的学生干部均可获得; 只要符合条件就可以得奖,每项奖学金的获奖人数没有限制,每名学生也可以同时获得多项奖学金。例如姚林的期末平均成绩是87分,班级评议成绩82分,同时他还是一位学生干部,那么他可以同时获得五四奖学金和班级贡献奖,奖金总数是4850元。

现在给出若干学生的相关数据,请计算哪些同学获得的奖金总数最高(假设总有同学能满足获得奖学金的条件)。

【输入文件】输入文件scholar.in的第一行是一个整数N(1≤N≤100),表示学生的总数。接下来的N行每行是一位学生的数据,从左向右依次是姓名,期末平均成绩,班级评议成绩,是否是学生干部,是否是西部省份学生,以及发表的论文数。姓名是由大小写英文字母组成的长度不超过20的字符串(不含空格);期末平均成绩和班级评议成绩都是0到100之间的整数(包括0和100);是否是学生干部和是否是西部省份学生分别用一个字符表示,Y表示是,N表示不是;发表的论文数是0到10的整数(包括0和10)。每两个相邻数据项之间用一个空格分隔。

【输出文件】输出文件scholar.out包括三行,第一行是获得最多奖金的学生的姓名,第二行是这名学生获得的奖金总数。如果有两位或两位以上的学生获得的奖金最多,输出他们之中在输入文件中出现最早的学生的姓名。第三行是这N个学生获得的奖学金的总数。

var name,nn:array [1..30] of char;{获得最多奖金的学生姓名为name;当前学生姓名为nn} n,i,j,tot,max,x,m1,m2,u:longint;

b1,b2,ch:char;

begin

assign(input,'scholar.in');

reset(input);

readln(n);{ 读学生数}

tot:=0;max:=0;fillchar(name,sizeof(name),' ');

for i:=1 to n do{读入每位学生的数据}

begin

fillchar(nn,sizeof(nn),' ');j:=0;{读第i位学生的姓名nn}

repeat

read(ch);

if ch=' ' then break;

inc(j);nn[j]:=ch

until false;

read(m1,m2);{ 读第i位学生的期末平均成绩和班级评议成绩、是否是学生干部和是否是西部省份学生的信息}

repeat read(b1) until (b1='Y') or (b1='N');

repeat read(b2) until (b2='Y') or (b2='N');

readln(u);{读发表的论文数}

x:=0;{累计第i位学生的奖金}

if (m1>80) and (u>=1) then x:=x+8000;

if (m1>85) and (m2>80) then x:=x+4000;

if (m1>90) then x:=x+2000;

if (m1>85) and (b2='Y') then x:=x+1000;

if (m1>80) and (b1='Y') then x:=x+850;

tot:=tot+x;{ 累计前i位学生的奖金总数}

if x>max{若第i位学生的奖金最多,则调整max并记下其名字}

then begin max:=x;name:=nn end{ then }

end;{ for }

close(input);{关闭输入文件}

assign(output,'scholar.out'); rewrite(output);{输出文件写准备}

i:=1;{输出获得最多奖金的学生姓名和奖金数}

while name[i]<>' ' do

begin write(name[i]);inc(i) end;{ while }

writeln;

writeln(max);

writeln(tot);{输出N个学生获得的奖学金总数}

close(output){关闭输出文件}

end.

上一篇:题二: 选数
下一篇:信息竞赛题19
网站首页网站地图 站长统计
All rights reserved Powered by 海文库
copyright ©right 2010-2011。
文档资料库内容来自网络,如有侵犯请联系客服。zhit326@126.com