第十七届全国青少年信息学奥林匹克联赛初赛试题.docx
《第十七届全国青少年信息学奥林匹克联赛初赛试题.docx》由会员分享，可在线阅读，更多相关《第十七届全国青少年信息学奥林匹克联赛初赛试题.docx（16页珍藏版）》请在冰点文库上搜索。
第十七届全国青少年信息学奥林匹克联赛初赛试题
第十七届全国青少年信息学奥林匹克联赛初赛试题
（普及组Pascal语言两小时完成）
●●全部试题答案均要求写在答卷纸上，写在试卷纸上一律无效●●
一、单项选择题（共20题，每题1.5分，共计30分。
每题有且仅有一个正确选项。
）
1、在二进制下，1101001+（）=1110110。
A、1011B、1101C、1010D、1111
2、字符“0”的ASCII码为48，则字符“9”的ASCII码为（）。
A、39B、57C、120D、视具体的计算机而定
3、一片容量为8GB的SD卡能存储大约（）张大小为2MB的数码照片。
A、1600B、2000C、4000D、16000
4、摩尔定律（Moore'slaw）是由英特尔创始人之一戈登·摩尔（GordonMoore）提出来的。
根据摩尔定律，在过去几十年以及在可预测的未来几年，单块集成电路的集成度大约每（）个月翻一番。
A、1B、6C、18D、36
5、无向完全图是图中每对顶点之间都恰有一条边的简单图。
已知无向完全图G有7个顶点，则它共有（）条边。
A、7B、21C、42D、49
6、寄存器是（）的重要组成部分。
A、硬盘B、高速缓存C、内存D、中央处理器（CPU）
7、如果根结点的深度记为1，则一棵恰有2011个叶结点的二叉树的深度最少是（）。
A、10B、11C、12D、13
8、体育课的铃声响了，同学们都陆续地奔向操场，按老师的要求从高到矮站成一排。
每个同学按顺序来到操场时，都从排尾走向排头，找到第一个比自己高的同学，并站在他的后面。
这种站队的方法类似于（）算法。
A、快速排序B、插入排序C、冒泡排序D、归并排序
9、一个正整数在二进制下有100位，则它在十六进制下有（）位。
A、7B、13C、25D、不能确定
10、有人认为，在个人电脑送修前，将文件放入回收站中就是已经将其删除了。
这种想法是（）。
A、正确的，将文件放入回收站意味着彻底删除、无法恢复
B、不正确的，只有将回收站清空后，才意味着彻底删除、无法恢复
C、不正确的，即使将回收站清空，文件只是被标记为删除，仍可能通过恢复软件找回
D、不正确的，只要在硬盘上出现过的文件，永远不可能被彻底删除
11、广度优先搜索时，需要用到的数据结构是（）。
A、链表B、队列C、栈D、散列表
12、在使用高级语言编写程序时，一般提到的“空间复杂度”中的“空间”是指（）。
A、程序运行时理论上所占的内存空间
B、程序运行时理论上所占的数组空间
C、程序运行时理论上所占的硬盘空间
D、程序源文件理论上所占的硬盘空间
13、在含有n个元素的双向链表中查询是否存在关键字为k的元素，最坏情况下运行的时间复杂度是（）。
A、O
（1）B、O（logn）C、O（n）D、O（nlogn）
14、生物特征识别，是利用人体本身的生物特征进行身份认证的一种技术。
目前，指纹识别、虹膜识别、人脸识别等技术已广泛应用于政府、银行、安全防卫等领域。
以下不属于生物特征识别技术及其应用的是（）。
A、指静脉验证B、步态验证C、ATM机密码验证D、声音验证
15、现有一段文言文，要通过二进制哈夫曼编码进行压缩。
简单起见，假设这段文言文只由4个汉字“之”、“乎”、“者”、“也”组成，它们出现的次数分别为700、600、300、200。
那么，“也”字的编码长度是（）。
A、1B、2C、3D、4
16、关于汇编语言，下列说法错误的是（）。
A、是一种与具体硬件相关的程序设计语言
B、在编写复杂程序时，相对于高级语言而言代码量较大，且不易调试
C、可以直接访问寄存器、内存单元、以及I/O端口
D、随着高级语言的诞生，如今已完全被淘汰，不再使用
17、（）是一种选优搜索法，按选优条件向前搜索，以达到目标。
当探索到某一步时，发现原先选择并不优或达不到目标，就退回一步重新选择。
A、回溯法B、枚举法C、动态规划D、贪心法
18、1956年（）授予肖克利（WilliamShockley）、巴丁（JohnBardeen）和布拉顿（WalterBrattain），以表彰他们对半导体的研究和晶体管效应的发现。
A、诺贝尔物理学奖
B、约翰·冯·诺依曼奖
C、图灵奖
D、高德纳奖（DonaldE.KnuthPrize）
19、对一个有向图而言，如果每个节点都存在到达其他任何节点的路径，那么就称它是强连通的。
例如，右图就是一个强连通图。
事实上，在删掉边（）后，它依然是强连通的。
A、aB、bC、cD、d
20、从ENIAC到当前最先进的计算机，冯·诺依曼体系结构始终占有重要的地位。
冯·诺依曼体系结构的核心内容是（）。
A、采用开关电路B、采用半导体器件
C、采用存储程序和程序控制原理D、采用键盘输入
二、问题求解（共2题，每题5分，共计10分）
1、每份考卷都有一个8位二进制序列号。
当且仅当一个序列号含有偶数个1时，它才是有效的。
例如，00000000、01010011都是有效的序列号，而11111110不是。
那么，有效的序列号共有________个。
2、定义字符串的基本操作为：
删除一个字符、插入一个字符和将一个字符修改成另一个字符这三种操作。
将字符串A变成字符串B的最少操作步数，称为字符串A到字符串B的编辑距离。
字符串"ABCDEFG"到字符串"BADECG"的编辑距离为________。
三、阅读程序写结果（共4题，每题8分，共计32分）
1、
Var
n,m,i,ans:
Integer;
Begin
Readln（n,m）;
ans:
=0;
i:
=n;
Whilei<=mDo
Begin
ans:
=ans+i;
Inc（i）;
End;
Writeln（ans）;
End.
输入：
1020
输出：
__________________
2、
Var
map,tel:
String;
i:
Integer;
Begin
map:
='22233344455566677778889999';
Readln（tel）;
Fori:
=1ToLength（tel）Do
If（tel[i]>='0'）AND（tel[i]<='9'）
ThenWrite（tel[i]）
Else
If（tel[i]>='A'）AND（tel[i]<='Z'）
ThenWrite（map[Ord（tel[i]）-Ord（'A'）+1]）;
End.
输入：
CCF-NOIP-2011
输出：
__________________
3、
Const
SIZE=100;
Var
n,i,sum,x:
Integer;
a:
Array[1..SIZE]OfInteger;
Begin
Readln（n）;
FillChar（a,SizeOf（a）,0）;
Fori:
=1TonDo
Begin
Read（x）;
Inc（a[x]）;
End;
i:
=0;
sum:
=0;
Whilesum<（nDIV2+1）Do
Begin
Inc（i）;
sum:
=sum+a[i];
End;
Writeln（i）;
End.
输入：
11
45664332321
输出：
__________________
4、
Varn,m:
Integer;
Functionsolve（n,m:
Integer）:
Integer;
Vari,sum:
Integer;
Begin
Ifm=1Then
Begin
solve:
=1;
Exit;
End;
sum:
=0;
Fori:
=1Ton-1Do
sum:
=sum+solve（i,m-1）;
solve:
=sum;
End;
Begin
Readln（n,m）;
Writeln（solve（n,m））;
End.
输入：
74
输出：
__________________
四、完善程序（前11空，每空2分，后2空，每空3分，共计28分）
1、（子矩阵）输入一个n1*m1的矩阵a，和n2*m2的矩阵b，问a中是否存在子矩阵和b相等。
若存在，输出所有子矩阵左上角的坐标；若不存在输出“Thereisnoanswer”。
Const
SIZE=50;
Var
n1,m1,n2,m2,i,j,k1,k2:
Integer;
a,b:
Array[1..SIZE,1..SIZE]OfInteger;
good,haveAns:
Boolean;
Begin
Readln（n1,m1）;
Fori:
=1Ton1Do
Forj:
=1Tom1Do
Read（a[i][j]）;
Readln（n2,m2）;
Fori:
=1Ton2Do
Forj:
=1Tom2Do
①;
haveAns:
=FALSE;
Fori:
=1Ton1-n2+1Do
Forj:
=1To②Do
Begin
③;
Fork1:
=1Ton2Do
Fork2:
=1To④Do
Ifa[i+k1-1][j+k2-1]<>b[k1][k2]Then
good:
=FALSE;
IfgoodThen
Begin
Writeln（i,'',j）;
⑤;
End;
End;
IfNOThaveAnsThen
Writeln（'Thereisnoanswer'）;
End.
2、（大整数开方）输入一个正整数n（1≤n＜10100），试用二分法计算它的平方根的整数部分。
Const
SIZE=200;
Type
hugeint=Record
len:
Integer;
num:
Array[1..SIZE]OfInteger;
End;
//len表示大整数的位数;num[1]表示个位、num[2]表示十位,以此类推
Var
s:
String;
i:
Integer;
target,left,middle,right:
hugeint;
Functiontimes（a,b:
hugeint）:
hugeint;
//计算大整数a和b的乘积
Var
i,j:
Integer;
ans:
hugeint;
Begin
FillChar（ans,SizeOf（ans）,0）;
Fori:
=1Toa.lenDo
Forj:
=1Tob.lenDo
①:
=ans.num[i+j-1]+a.num[i]*b.num[j];
Fori:
=1Toa.len+b.lenDo
Begin
ans.num[i+1]:
=ans.num[i+1]+ans.num[i]DIV10;
②;
Ifans.num[a.len+b.len]>0
Thenans.len:
=a.len+b.len
Elseans.len:
=a.len+b.len-1;
End;
times:
=ans;
End;
Functionadd（a,b:
hugeint）:
hugeint;
//计算大整数a和b的和
Var
i:
Integer;
ans:
hugeint;
Begin
FillChar（ans.num,SizeOf（ans.num）,0）;
Ifa.len>b.len
Thenans.len:
=a.len
Elseans.len:
=b.len;
Fori:
=1Toans.lenDo
Begin
ans.num[i]:
=③;
ans.num[i+1]:
=ans.num[i+1]+ans.num[i]DIV10;
ans.num[i]:
=ans.num[i]MOD10;
End;
Ifans.num[ans.len+1]>0
ThenInc（ans.len）;
add:
=ans;
End;
Functionaverage（a,b:
hugeint）:
hugeint;
//计算大整数a和b的平均数的整数部分
Var
i:
Integer;
ans:
hugeint;
Begin
ans:
=add（a,b）;
Fori:
=ans.lenDownTo2Do
Begin
ans.num[i-1]:
=ans.num[i-1]+（④）*10;
ans.num[i]:
=ans.num[i]DIV2;
End;
ans.num[1]:
=ans.num[1]DIV2;
Ifans.num[ans.len]=0
ThenDec（ans.len）;
average:
=ans;
End;
Functionplustwo（a:
hugeint）:
hugeint;
//计算大整数a加2后的结果
Var
i:
Integer;
ans:
hugeint;
Begin
ans:
=a;
ans.num[1]:
=ans.num[1]+2;
i:
=1;
While（i<=ans.len）AND（ans.num[i]>=10）Do
Begin
ans.num[i+1]:
=ans.num[i+1]+ans.num[i]DIV10;
ans.num[i]:
=ans.num[i]MOD10;
Inc（i）;
End;
Ifans.num[ans.len+1]>0
Then⑤;
plustwo:
=ans;
End;
Functionover（a,b:
hugeint）:
Boolean;
//若大整数a>b则返回1,否则返回0
Var
i:
Integer;
Begin
If（⑥）Then
Begin
over:
=FALSE;
Exit;
End;
Ifa.len>b.lenThen
Begin
over:
=TRUE;
Exit;
End;
Fori:
=a.lenDownTo1Do
Begin
Ifa.num[i]Begin
over:
=FALSE;
Exit;
End;
Ifa.num[i]>b.num[i]Then
Begin
over:
=TRUE;
Exit;
End;
End;
over:
=FALSE;
End;
Begin
Readln（s）;
FillChar（target.num,SizeOf（target.num）,0）;
target.len:
=Length（s）;
Fori:
=1Totarget.lenDo
target.num[i]:
=Ord（s[target.len-i+1]）-⑦;
FillChar（left.num,SizeOf（left.num）,0）;
left.len:
=1;
left.num[1]:
=1;
right:
=target;
Repeat
middle:
=average（left,right）;
Ifover（⑧）
Thenright:
=middle
Elseleft:
=middle;
Untilover（plustwo（left）,right）;
Fori:
=left.lenDownTo1Do
Write（left.num[i]）;
Writeln;
End.
CCFNOIP2011普及组（Pascal语言）参考答案与评分标准
一、单项选择题（共20题，每题1.5分，共计30分）
1
2
3
4
5
6
7
8
9
10
B
B
C
C
B
D
C
B
C
C
11
12
13
14
15
16
17
18
19
20
B
A
C
C
C
D
A
A
A
C
二、问题求解（共2题，每题5分，共计10分）
1．128
2．3
三、阅读程序写结果（共4题，每题8分，共计32分）
1．165
2．22366472011
3．3
4．20
四、完善程序（前11空，每空2分，后2空，每空3分，共计28分）
（说明：
以下各程序填空可能还有一些等价的写法，各省可请本省专家审定和上机验证，不一定上报科学委员会审查）
1．①read（b[i][j]）
②m1-m2+1
③good:
=true
④m2
⑤haveAns:
=true
2．①ans.num[i+j-1]
②ans.num[i]:
=ans.num[i]mod10;
③ans.num[i]+a.num[i]+b.num[i];
④ans.num[i]mod2（或ans.num[i]and1）
⑤inc（ans.len）（或ans.len:
=ans.len+1）
⑥a.len⑦ord（'0'）（或48）
⑧times（middle,middle）,target
升级会员 