1、“讯飞杯”合肥市第二十八届信息学奥林匹克竞赛 小学组合肥 2011-11-26 第 1 页/共 19页“xn讯fi飞bi杯”h合fi肥sh市 d第 r二sh十 b八ji届qn青sho少nin年xn信 x息xu学 o奥ln林 p匹 k克jn竞si赛（xio小xu学 z组）解题报告2011年11月26日 14:00-16:30（请选手务必仔细阅读本页内容）y一、 t题m目i概kun况二、注意事项1.考试时间为150分钟。2.务必看清题目，严格按照所要求的格式输入、输出。中文题目名称 聪聪买书 魅力镜片 好胜的明明 礼尚往来源程序名 book magic prevail gift输入文件名 book
2、.in magic.in prevail.in gift.in输出文件名 book.out magic.out prevail.out gift.out满分 100 100 100 100测试点数目 10 10 10 10是否有部分分 否 否 否 否内存限制 128M 128M 128M 128M每个测试点时限 1秒 1秒 1秒 1秒“讯飞杯”合肥市第二十八届信息学奥林匹克竞赛 小学组合肥 2011-11-26 第 2 页/共 19页3.在调试程序时请先使用题目中的示例数据，然后再自行设计多组测试数据进行调试。4.每题一般有10个测试点，测试有严格的时间限制，请尽可能优化算法。5.命名规则：(
3、1)每题都规定了该题的英文名称。(2)程序文件和数据文件的主文件名都是该题的英文名字。(3)程序文件扩展名采用语言环境的默认扩展名。(4)数据文件都是文本文件，输入和输出文件的扩展名分别是.in和.out。6.程序应从输入文件读取数据，并严格地按照规定的输出格式将结果输出到输出文件中。输入数据文件和输出数据文件都与程序在同一个目录中，由于程序所在目录是不确定的，因此不允许在文件名中含有盘符信息和任何形式的路径信息。7.选手在竞赛结束时应在D盘的根目录下建立以准考证号命名的文件夹，并将所完成各题的源程序文件和可执行文件拷贝到该文件夹中。1.聪聪买书（book.bas/book.pas/book.
4、c）【问题描述】圣诞节快到了，聪聪准备给他的好朋友们买些小礼物。当然，聪聪知道这些好朋友们都非常喜欢看漫画书，所以，聪聪就决定买些好看的漫画书送给他们。经过一段时间的调查，聪聪发现有3种买书的方式：“讯飞杯”合肥市第二十八届信息学奥林匹克竞赛 小学组合肥 2011-11-26 第 3 页/共 19页1 .书店现场购买：10元/本，超过5本以外的，8元/本，超过10本以外的，则6.5元/本；2.网上购买：9元/本，超过10本，全部打8折，超过50本，则全部打六折；3.团购：10本起团购，7元/本，达到或超过30本，则6元/本，达到或超过50本，则5元/本。聪聪想用其中一种方式购n本书，请你帮他计
5、算应付多少元钱？【输入文件】输入文件只有1行为两个数k和n，中间以一个空格隔开其中k表示选择的购买方式（k=1表示书店现场购买，k=2表示网上购买，k=3表示团购），n表示购买的本数(n50 thens:=s*0.6elseif n10 thens:=s*0.8;end;if k=3 thenbeginif n=50 thens:=n*5elseif n=30 thens:=n*6elseif n=10 thens:=n*7;end;write(s+0.1:0:0);close(input);close(output);end.“讯飞杯”合肥市第二十八届信息学奥林匹克竞赛 小学组合肥 2011
6、-11-26 第 6 页/共 19页但这次是四舍五入的软件，所以只得了90分，后来听老师讲了一不管他是五舍六入还是四舍五入。那就是trunc（s+0.5)。程序如下：var k,n,i,j:longint;s:real;beginassign(input,book.in);assign(output,book.out);reset(input);rewrite(output);readln(k,n);if k=1 thenbeginif n50 thens:=s*0.6elseif n10 thens:=s*0.8;end;if k=3 thenbeginif n=50 thens:=n*5e
7、lseif n=30 thens:=n*6elseif n=10 thens:=n*7;end;write(trunc(s+0.5);“讯飞杯”合肥市第二十八届信息学奥林匹克竞赛 小学组合肥 2011-11-26 第 8 页/共 19页close(input);close(output);end. 2.魅力镜片（magic.bas/magic.pas/magic.c）【问题描述】由于聪聪一次性购买的书比较多，所以客气的书店老板免费赠送一块好玩的镜片给聪聪玩。一段时间以后，聪聪发现这块镜片真的不简单：只要我们随便在纸上写一个整数，经过这个镜片一照，组成这个整数的各位数字顺序就会反转，得到一个新数
8、，当然，神奇的不仅是这些，镜片产生的新数依然符合整数的常见情形，即除非给定的整数为零，否则反转得到的新数最高位数字不能为0。好奇的聪聪大胆猜测这个镜片中肯定有些智能化的东西。但是，这个东西到底是怎么实现的呢？聪聪想用计算机程序来模拟这一功能，于是，他就找到了擅长编程的你，请你帮助聪聪来解决这一问题。【输入文件】输入共一行，一个整数。【输出文件】输出共一行，表示经镜片反转后得到的新数。【输入输出样例1】“讯飞杯”合肥市第二十八届信息学奥林匹克竞赛 小学组合肥 2011-11-26 第 9 页/共 19页magic.in magic.out123 321【输入输出样例2】magic.in magi
9、c.out-120 -21【数据范围】-1,000,000,000N1,000,000,000。这题就是要把他用字符串判-，预处理末尾的0，然后反过来输出。程序如下：vari,j,k:longint;a:string;beginassign(input,magic.in);assign(output,magic.out);reset(input);rewrite(output);readln(i);str(i,a);k:=length(a);“讯飞杯”合肥市第二十八届信息学奥林匹克竞赛 小学组合肥 2011-11-26 第 10 页/共 19页if a1=- thenbeginwrite(-)
10、;delete(a,1,1);k:=k-1;end;while (ak=0)and(k0 dobegink:=k*10+a mod 10;writeln(a div 10);a:=a div 10;end;write(k);close(input);close(output);end. 3. 好胜的明明（prevail.bas/prevail.pas/prevail.c）【问题描述】明明和聪聪是好朋友，看着聪聪整天在他面前摆弄着那块神奇的镜片，明明有点生气，总想找个机会挫挫他的锐气，但是为了不破坏他们之间的友谊，明明给聪聪出了一道难题，题目是这样的：明明在学习英语的时候发现记单词是一件很痛苦的
11、事，因为这些单词都杂乱无章，于是明明决定对单词进行分类。两个单词可以分为一类当且仅当组成这两个单词的“讯飞杯”合肥市第二十八届信息学奥林匹克竞赛 小学组合肥 2011-11-26 第 12 页/共 19页各个字母的数量均相等，例如“AABAC”，它和“CBAAA”就可以归为一类，而和“AAABB”就不是一类。现在有N个单词，所有单词均由大写字母组成，每个单词的长度不超过100。请你告诉明明这些单词会被分成几类。【输入文件】输入文件的第一行为单词个数N，以下N行每行一个单词。【输出文件】输出文件仅包含一个数，表示这N个单词分成的类数。【样例输入输出】prevail.in prevail.out3
12、AABACCBAAAAAABB 2【数据范围】对于70%的数据满足N100；对于100%的数据满足N550。这题有很多的做法，我把它每个排个序，然后拍个大序，如果在一起是一样的再找，直到不一样的时，个数加1；程序如下：varb:array1550of string;n,i,k,j:integer;d:string;“讯飞杯”合肥市第二十八届信息学奥林匹克竞赛 小学组合肥 2011-11-26 第 13 页/共 19页procedure q(x,y:integer;var e:string);var i,j:integer;k,t:char;begini:=x;j:=y;k:=e(x+y)div
13、 2;repeatwhile eik doj:=j-1;if ij);if xbi thenbegind:=bi;k:=k+1;end;if ntrunc(sqrt(n)or(kn)and(strunc(sqrt(n)k:=k-s*s*i;end;end;beginassign(input,gift.in);assign(output,gift.out);reset(input);rewrite(output);readln(n);k:=0;dfs(1,k);write(ans);close(input);close(output);end.“讯飞杯”合肥市第二十八届信息学奥林匹克竞赛 小学组合肥 2011-11-26 第 19 页/共 19页
