普及组Pascal语言试题
竞赛时间：2013年10月13日14:30~16:30
选手注意：试题纸共有9页，答题纸共有2页，满分100分。请在答题纸上作答，写在试题纸上的一律无效。不得使用任何电子设备（如计算器、手机、电子词典等）或查阅任何书籍资料。一、单项选择题（共20题，每题1.5分，共计30分；每题有且仅有一个正确选项）
1.一个32位整型变量占用（）个字节。A.4B.8C.32D.1282.二进制数11.01在十进制下是（）。A.3.25B.4.125C.6.25D.11.125
3.下面的故事与（）算法有着异曲同工之妙。
从前有座山，山里有座庙，庙里有个老和尚在给小和尚讲故事：‚从前有座山，山
里有座庙，庙里有个老和尚在给小和尚讲故事：‘从前有座山，山里有座庙，庙里有个
老和尚给小和尚讲故事....’‛
A.枚举B.递归C.贪心D.分治
4.逻辑表达式（）的值与变量A的真假无关。A.(A∨B)∧¬AB.(A∨B)∧¬B
C.(A∧B)∨(¬A∧B)D.(A∨B)∧¬A∧B
5.将（2,6,10,17）分别存储到某个地址区间为0~10的哈希表中，如果哈希函数h(x)=
（），将不会产生冲突，其中amodb表示a除以b的余数。
2
A.xmod11B.xmod11C.2xmod11D.⌊√x⌋mod11，其中⌊√x⌋表示√x下取整6.在十六进制表示法中，字母A相当于十进制中的（）。A.9B.10C.15D.16
CCFNOIP2013初赛普及组Pascal语言试题第1页共10页7.下图中所使用的数据结构是（）。
A.哈希表B.栈C.队列D.二叉树
8.在Windows资源管理器中，用鼠标右键单击一个文件时，会出现一个名为“复制”的
操作选项，它的意思是（）。A.用剪切板中的文件替换该文件
B.在该文件所在文件夹中，将该文件克隆一份C.将该文件复制到剪切板，并保留原文件D.将该文件复制到剪切板，并删除原文件
9.已知一棵二叉树有10个节点，则其中至多有（）个节点有2个子节点。
A.4B.5C.6D.710.在一个无向图中，如果任意两点之间都存在路径相连，则称其为连通图。下图是一个有4个顶点、6条边的连通图。若要使它不再是连通图，至少要删去其中的（）条边。
A.1B.2C.3D.4
11.二叉树的（）第一个访问的节点是根节点。
A.先序遍历B.中序遍历C.后序遍历D.以上都是
12.以A0作为起点，对下面的无向图进行深度优先遍历时，遍历顺序不
CCFNOIP2013初赛普及组Pascal语言试题第2页共10页可能是（）。
A.A0,A1,A2,A3C.A0,A2,A1,A3B.A0,A1,A3,A2D.A0,A3,A1,A2
13.IPv4协议使用32位地址，随着其不断被分配，地址资源日趋枯竭。因此，它正逐渐被
使用（）位地址的IPv6协议所取代。A.40B.48C.64D.128
14.（）的平均时间复杂度为O(nlogn)，其中n是待排序的元素个数。
A.快速排序B.插入排序C.冒泡排序D.基数排序15.下面是根据欧几里得算法编写的函数，它所计算的是a和b的（）。
functioneuclid(a,b:longint):longint;begin
ifb=0then
euclid:=aelse
euclid:=euclid(b,amodb);
end;
A.最大公共质因子B.最小公共质因子C.最大公约数D.最小公倍数16.通常在搜索引擎中，对某个关键词加上双引号表示（）。A.排除关键词，不显示任何包含该关键词的结果
B.将关键词分解，在搜索结果中必须包含其中的一部分C.精确搜索，只显示包含整个关键词的结果D.站内搜索，只显示关键词所指向网站的内容
CCFNOIP2013初赛普及组Pascal语言试题第3页共10页17.中国的国家顶级域名是（）。A..cnB..chC..chnD..china
18.把64位非零浮点数强制转换成32位浮点数后，不可能（）。A.大于原数B.小于原数
C.等于原数D.与原数符号相反
19.下列程序中，正确计算1,2,…,100这100个自然数之和sum（初始值为0）的是（）。
20.CCFNOIP复赛全国统一评测时使用的系统软件是（）。A.NOIWindowsB.NOILinuxC.NOIMacOSD.NOIDOS
二、问题求解（共2题，每题题5分，共计10分；每题全部答对得5分，没有部分分）
1.7个同学围坐一圈，要选2个不相邻的作为代表，有_________种不同的选法。
2.某系统自称使用了一种防窃听的方式验证用户密码。密码是n个数s1,s2,…,sn，均为0或1。该系统每次随机生成n个数a1,
a2,…,an，均为0或1，请用户回答(s1a1+s2a2+…+snan)除以2的余数。如果多次的回答总是正确，即认为掌握密码。该系统认为，即使问答的过程被泄露，也无助于破解密码——因为用户并没有直接发送密
CCFNOIP2013初赛普及组Pascal语言试题第4页共10页码。
然而，事与愿违。例如，当n=4时，有人窃听了以下5次问答：
三、阅读程序写结果（共4题，每题8分，共计32分）1.var
a,b:integer;readln(a,b);
writeln(a,'+',b,'=',a+b);end.
输入：35
输出：_________
2.a,b,u,i,num:integer;begin
readln(a,b,u);
num:=0;begin
inc(num);end;
CCFNOIP2013初赛普及组Pascal语言试题第5页共10页writeln(num);end.
输入：110015输出：_________
3.constSIZE=100;
n,f,i,left,right,middle:integer;
a:array[1..SIZE]ofinteger;begin
readln(n,f);
fori:=1tondoread(a[i]);left:=1;right:=n;repeat
middle:=(left+right)div2;if(f<=a[middle]then
right:=middleelse
left:=middle+1;until(left>=right);
writeln(left);
end.
输入：1217
24691115171819202125输出：____________________
CCFNOIP2013初赛普及组Pascal语言试题第6页共10页4.constSIZE=100;Var
n,ans,i,j:integer;
height,num:array[1..SIZE]ofinteger;
begin
read(n);
fori:=1tondobegin
read(height[i]);num[i]:=1;
forj:=1toi-1dobegin
if((height[j] fori:=1tondobegin if(num[i]>ans)then ans:=num[i]; end; writeln(ans);end.输入：6 25311124 输出：_________________ CCFNOIP2013初赛普及组Pascal语言试题第7页共10页then四、完善程序（共2题，每题14分，共计28分） CCFNOIP2013初赛普及组Pascal语言试题第8页共10页CCFNOIP2013初赛普及组Pascal语言试题第9页共10页答案： 一、AABCDBBCACAADACCADAB二、（1）14（2）0111三、（1）3+5=8（2）6（3）7四、1. (1)n-p+i(2)a[i](3)n(4)i-p+1(5)a[i-p]2.(1)(2)(3)(4)(5) （4）4 cur CCFNOIP2013初赛普及组Pascal语言试题第10页共10页 因篇幅问题不能全部显示，请点此查看更多更全内容