信息学竞赛普及组初赛模拟试题二

1、信息学竞赛普及组初赛模拟试题(二)(pascal语言)限时2小时完成，满分100分一、选择题：(共20小题，1-15小题为单选题，每题1分；16-20小题为多选题，每题2分。共25分)1对存储器按字节进行编址，若某存储器芯片共有10根地址线的引脚，则该存储器芯片的存储容量为(：。(A) 512B(B)1KB(C)2KB(D)4KB(E)8KB在待排序的数据表已经为有序时，下列排序算法中花费时间反而多的是(匸。(A) 堆排序(B)希尔排序(C)冒泡排序(D)快速排序(E)二分排序某数列有1000个各不相同的单元，由低至高按序排列，现要对该数列进行二分法检索，在最坏的情况下，需要检索(匚单元。(A

2、)1000(B)10(C)100(D)500(E)3004已知数组a中，每个元素ai,j在存储时要占3个字节，设i从1变化到8,j从1变化到10，分配内存实是从地址sa开始连续按行存储分配的。试问：a5,8的起始地址为(匚。(A)sa+141(B)sa+180(C)sa+222(D)sa+225(E)sa+155在pascal语言过程调用时，数值形参得到的是实际参数的(匚。(A)数值(B)地址(C)值(D)变量(E)以上都不是个24*24点阵的汉字字形信息所占的字节数为(丨。(A)2(B)8(C)24(D)32(E)72在微机系统中，最基本的输入输出模块BIOS存放在(匚中。(A)RAM(B)

3、ROM(C)硬盘(D)寄存器(E)控制器十进制算术表达式：3*512+5*64+2*8+1的运算中，用二进制表示为(匚。(A)1011010001(B)(C)(D)(E)111000设栈S的初始状态为空，现对序列1,2,3,4,5在栈S上,依次进行如下操作(从元素1开始，出栈后不再进栈)：进栈,出栈，进栈，进栈，出栈,出栈。试问出栈的元素序列是(丨。(A)1,2,3B)1,3,2C)3,2,1D)2,3,1(E)以上都不对E-mail邮件本质上是一个(A)文件(B)电报(C)电话(D)传真(E)电讯一棵二叉树的高度为h，所有结点的度为0，或为2,则此树最少有(匚个结占八、(A)2h-1(B)2

4、h-1(C)2h+1(D)h+1(E)h*h+1无向图G=(V，E)，其中V=a,b,c,d,e,fE=(a,b),(a,e),(a,c),(b,e),(c,f),(f,d),(e,d)对该图进行深度优先遍历，得到的顶点序列正确的是(A)a,b,e,c,d,f(B)a,c,f,e,b,d(C)a,e,b,c,f,d(D)a,b,e,d,f,c(E)以上都不对pascal编译程序是(A) .把pascal源程序转换成可运行的EXE文件的程序(B) .把pascal源程序转换成等价的目标码的程序(C) .生成和修改一个pascal语言源程序的等程序(D) .把pascal的目标码程序转换成可运行的

5、EXE文件的程序（E）.生成一个等价的汇编程序将三封信投到4个邮筒，最多的投法有（）（A）种（B）种（C）种（D）34种E.5. 电子信函（电子邮件）的特点之一是（）。（A）比邮政信函，电报，电话，传真都更快（B）.在通信双方的计算机之间建立其直接的通信线路后即可快速传递数字信息（C）.采用存储-转发方式在网络上逐步传递信息,不象电话那样直接、及时,但费用低廉（D）.在通信双方的计算机都开机工作的情况下即可快速传递数字信息以下属于多媒体硬件的是（）（A）主机（B）.光驱（C）.声卡（D）.音箱（E）.超级解霸正确的二维数组类型说明是（）（A）typear2=array1.5,5.1ofinte

6、ger;（B）typear2=array1.5ofarray5.1ofinteger;（C）typear2=array1.5,1.5ofinteger;（D）typear2=array1.5ofarray1.5ofinteger（E）typear2=array1.5,1.5of0.1下列属于信息处理的是（）（A）信息加工（B）信息分类（C）信息技术（D）信息采集（E）信息存储6. 在windows中,最小化一个应用程序窗口后，该程序将（）。（A）被终止执行（B）被暂停执行（C）被转入后台（D）继续执行（E）以上答案都不对下面的常量说明中，正确的是（）（A）CONST（B）、CONST（C）、C

7、ONST（D）、CONST（E）CONSTt=trueb,C=45M=100，15N=1OR2a='A'二、问题求解：（第1小题5分，第2-3小题各4分,共13分）问题1:在所有三位数中，各位数字从高位到低位顺次减小的数共有个。问题2："银条"一位银矿勘探员无力预付3月份的房租。他有一根长31英寸的纯银条，因此他和女房东达成如下协议。他说，他将把银条切成小段。3月份的第一天，他给女房东1英寸长的一段，然后每天给她增加1英寸，以此作为抵押。勘探员预期到3月份的最后一天，他能全数付清租金，而届时女房东将把银条小段全部还给他。3月份有31天，一种办法是把银条切成3

8、1段，每段长1英寸。可是这处花很多功夫。勘探员希望既履行协议，又能使银条的分段数目尽量减少。例如，他可以第一天给女房东1英寸的一段，第二天再给1英寸的一段，第三开他取回这两段1英寸的而给她3英寸的一段。假设银条的各段是按照这种方式来回倒换的话，勘探员至少需要把他的银条切成段？问题3:"换不开的钞票"钱柜里有1.15美分，一位顾客提出：把1美元的钞票换成硬币，但出纳小姐说换不开，后来这位顾客提出：把50美分的钞票换成硬币，但出纳小姐又说换不开，而实际上，出纳小姐也无法把25美分、10美分、5美分的钞票换成硬币请问钱柜里到底有哪些硬币？他们分别有多少枚？答：。三、写出程序的运行

9、结果：(每小题6分，共30分)1.programtext1;constn=6;m=3;vari,j,k:integer;beginfori:=-ntondobegink:=n-abs(i);write('':39-k);forj:=-ktokdoifabs(j)>k-mthenwrite(n-(i+n)div2)elsewrite('');writeln;end;end.输出的结果为：2.PROGAMtext2；VARa:ARRAY1.10OFChar；k:Integer；ch:Char；BEGINFORk:=1TO10DOak:=Chr(Ord('

10、;A')+k)；FORk:=1TO10DOBEGINch:=ak；ak:=a11-k；a11-k:=ch；END；FORk:=1TO10DOWrite(ak)；WritelnEND.输出的结果为：3.programtext3(input,output);Varm,n,p:integer;x:real;proceduremm(varm:integer;x:real);varn:integer;beginm:=m+1;n:=m+1;x:=n*3;p:=n;end;beginm:=8;n:=5;p:=3;x:=1.0;mm(n,x);writeln(m:5,n:5,p:5,x:6:1);en

11、d.输出的结果为：2. programtext4;constn=5;typeary=array0.n-1,0.n-1ofinteger;vara:ary;i,j,k:integer;beginfori:=0ton-1doforj:=0ton-1doai,j:=0;k:=1;fori:=1tondoforj:=n-1downtoidobeginaj,j-i:=k;k:=k+1;end;fori:=0ton-1dobeginforj:=0ton-1dowrite(aI,j:4);writeln;end;end.输出的结果为：3. programtext5(input,output);varch:c

12、har;i,n,sum:integer;beginsum:=0;read(ch);casechof'A':fori:=4to6dobeginread(n):sum:=sumnend;'B'：beginread(n);fori:=1tondobeginread(n);sum:=sumnend;end;'C':repeatread(n);sum:=sumnuntilsum>10;'D':beginread(n);whilen<=3dobeginsum:=sumn;read(n)endendend;writeln(sum:4

13、)end.当程序运行(1)输入A4123456789时，其输出为(2)输入B4123456789时，其输出为(3)输入C4123456789时，其输出为(4)输入D4123456789时，其输出为四、完善程序(第1题每空2分第2、3题每空3分，共32分)第1题孪生素数是指两个相差为2的素数，例如：3和5，5和7，11和13等。下面程序可输出15对孪生素数，其中函数q判断整数a是否为素数。programp(output);vark,n:integerfunctionq(a:integer):booklean;vark:integer;flag:boolean;beginflag:_(1)k:=2

14、_(2)(k<=adiv2)andflagdoifamodk=0then(3)elsek:=k+1q:=flagend;beginn:=0;k:=2;repeatifq(k)and_(4)_thenbeginn:=n+1;writeln(k,k+2)end;k:=K+1untiln=5end.第二题已知有类型arr=array1.16ofstring;arr型数组a中存放着从第1届到第16届足球世界杯冠军国家的名字，下面的函数可求出历界世界杯比赛共有几个国家曾获得过世界杯冠军，请填空完成。Functiontext2(a:arr):integer;vark,j,s:integer;mult

15、:boolean;begin_(5)_;forj:=2to16dobegink:=1;mult:=false;whilenotmultand_(6)_doif_(7)_thenmult:=tureelsek:=k+1;ifnotmultthens:=_(8)_end;text2:=send;第三题Fibonacci(裴波那契)数列的规律是：前2个数均为1,从第3个数开始每个数等于它前面两个数之和，即：1，1，2，3，5，8，13，21，34，55，89，144，233,377,.。已知任意一个大于0的整数可以表示为若干个互不相同的fibonacci之数和。例如：121=89+21+8+3下面的

16、程序是由键盘输入一个正整数n，输出组成n的互不相同的fibonacci数。例如：若输入121则输入121=+89+21+8+3本程序的算法如下：(n=121为例)1) 寻找小于或等于n的最大的fibonacci数a(例如89)，并以a作为组成n的一个数输出。2) 若na则以n-a作为新的任意正整数(例如32)，重复步骤1.若n=a,则结束。程序中的函数find返回小于或等于n的最大的fibonacci数。programtext3(input,output);varn:integer;functionfind(n:integer):integer;vara,b,c:integer;begina:

17、=1;b:=1;repeatc:=_(9)_;a:=b;b:=c;untilb>=n;ifb=nthenfind:=_(10)_elsefind:=_(11)_end;procedurep(n:integer);vara:integer;begina:=find(n);write('+',a:4);ifa<nthenp_(12)_end;beginreadln(n);write(n:5,'=');p(n);writelnend.信息学竞赛初中组初赛模拟试题参考答案一、选择题：(本题共20小题，1-15小题为单选题，每题1分；16-20小题为多选题，每

18、题2分。共25分)题号答案BDBABEBCBA题号1112131415答案BDBCC题号1617181920答案ABCDCEABDECDAE二、问题求解：（第1小题3分，第2-3小题各5分,共13分）问题1：120问题2：5问题3：50美分1枚，25美分1枚，10美分4枚，5美分1枚，1美分4枚三、写出程序的运行结果：（每小题6分，共30分）1、输出结果为：2、输出结果为：BCDEFGHIJK6666555555555554444444444443333333333332222225、当程序运行(1) 输入A41(2) 输入B41(3) 输入C41(4) 输入D415、当程序运行(5) 输入A41(6) 输入B41(7) 输入C41(8) 输入D4123