NOIP第二十二届全国青少年信息学奥林匹克联赛提高组初赛pascalWord文件下载.docx
《NOIP第二十二届全国青少年信息学奥林匹克联赛提高组初赛pascalWord文件下载.docx》由会员分享，可在线阅读，更多相关《NOIP第二十二届全国青少年信息学奥林匹克联赛提高组初赛pascalWord文件下载.docx（16页珍藏版）》请在冰豆网上搜索。
右孩子，则对应的为空指针。
那么该链表中空指针的数目为（）。
A.6B.7C.12D.14
8.G是一个非连通简单无向图，共有28条边，则该图至少有（）
A.10B.9C.8D.7
9.某计算机的CPU和内存之间的地址总线宽度是32位（bit）,这台计算机最多可以使用）的内存。
var
k,n:
longint;
begin
k:
=4;
n:
=0;
whilen<
kdo
begin
inc（n）;
ifnmod3<
>
0thencontinue;
dec（k）;
end;
writeln（k,'
'
n）;
end.
C.Michael,Eve,JacobD.Micheal,Peter,Monica
13.周末小明和爸爸妈妈三个人一起想动手做三道菜。
小明负责洗菜、爸爸负责切菜、妈妈负责炒菜。
假设做每道菜的顺序都是：
先洗菜10分钟，然后切菜10分钟，最后炒菜10分
钟。
那么做一道菜需要30分钟。
注意：
两道不同的菜的相同步骤不可以同时进行。
例如第一道菜和第二道的菜不能同时洗，也不能同时切。
那么做完三道菜的最短时间需要（）分
A.90B.60C.50D.40
14•假设某算法的计算时间表示为递推关系式
巩1）=1
则算法的时间复杂度为（）。
A.0（?
?
B.0（"
）C.0（"
log?
D.0（?
）
15.给定含有n个不同的数的数组L=<
x1,X2,...,刈>
。
如果L中存在Xi（1<
i<
n）使得X1<
x?
<
...<
xi-1<
x>
xi+1>
...>
xn，则称L是单峰的，并称x是L的"
峰顶"
现在已知L是单峰的，
请把a-c三行代码补全到算法中使得算法正确找到L的峰顶。
a.Search（k+1,n）
b.Search（1,k-1）
c.returnL[k]
Search（1,n）
1.k—?
n/2?
2.ifL[k]>
L[k-1]andL[k]>
L[k+1]
3.then
4.elseifL[k]>
L[k-1]andL[k]<
5.then
6.else
正确的填空顺序是（）。
D.b,a,c
A.c,a,bB.c,b,aC.a,b,c
、不定项选择题（共5题，每题1.5分，共计7.5分；
每题有一个或多个正确选项，多
选或少选均不得分）
1.以下属于无线通信技术的有（）。
A.蓝牙
B.WiFiC.GPRSD.以太网
2.可以将单个计算机接入到计算机网络中的网络接入通讯设备有（）。
A.网卡B.光驱C.鼠标D.显卡
3.下列算法中运用分治思想的有（）。
D.计数排序
A.快速排序B.归并排序C.冒泡排序
4.下图表示一个果园灌溉系统，有A、B、C、
D四个阀门，每个阀门可以打开或关上，所有管道粗细相同，以下设置阀门的方法中，可以让果树浇上水的有（）。
A.B打开，其他都关上
C.A打开，其他都关上
B.AB都打开，CD都关上
D.D打开，其他都关上
5.参加NOI比赛，以下能带入考场的有（）。
A.钢笔B.适量的衣服C.U盘
三、问题求解（共2题，每题5分，共计10分；
每题全部答对得5分，没有部分分）
1.一个1X8的方格图形（不可旋转）用黑、白两种颜色填涂每个方格。
如果每个方格只
能填涂一种颜色，且不允许两个黑格相邻，共有种填涂方案。
2.某中学在安排期末考试时发现，有7个学生要参加7门课程的考试，下表列出了哪些学
生参加哪些考试（用"
表示要参加相应的考试）。
最少要安排个不同的考试时间段才能避免冲突？
考试
学生1
学生2
学生3
学生4
学生5
学生6
学生7
通用技术
V
物理
化学
生物
历史
地理
政治
V-
四、阅读程序写结果（共4题，每题8分，共计32分）
1.var
a:
array[1..6]ofIongint=（1,2,3,4,5,6）;
pi,pj,t,i:
pi:
=1;
pj:
=6;
whilepi<
pjdobegin
t:
=a[pi];
a[pi]:
=a[pj];
a[pj]:
=t;
inc（pi）;
dec（pj）;
end;
fori:
=1to6dowrite（a[i],'
）;
writeln;
end.
输出：
2.var
n,i,j,k:
total_len:
array[1..100]oflongint;
len:
array[1..100,1..3]oflongint;
a,b:
array[1..100,1..100]ofchar;
c:
array[1..100]ofstring[100];
i:
j:
k:
readln（n）;
=1tondo
readln（c[i]）;
total_len[i]:
=length（c[i]）;
j:
while（c[i,j]<
'
:
'
）do
a[i,k]:
=c[i,j];
=k+1;
inc（j）;
len[i,1]:
=k-1;
=chr（0）;
forj:
=j+1tototal_len[i]do
b[i,k]:
len[i,2]:
=k-1;
b[i,k]:
=chr（0）;
if（len[i,1]>
=len[i,2]）thenwrite（'
NO,'
else
=1tolen[i,2]dobegin
ifa[i,k]=b[i,j]then
ifk>
len[i,1]thenbreak;
ifj=len[i,2]thenwrite（'
elsewrite（'
YES,'
end.
输入：
3
AB:
ACDEbFBkBD
AR:
ACDBrT
SARS:
SevereAtypicalRespiratorySyndrome输出：
（注：
输入各行前后均无空格）
3.functionlps（seq:
string;
i,j:
longint）:
var
len1,len2:
ifi=jthen
exit
（1）;
ifi>
jthen
exit（0）;
if（seq[i]=seq[j]）then
exit（lps（seq,i+1,j-1）+2）;
len1:
=lps（seq,i,j-1）;
len2:
=lps（seq,i+1,j）;
iflen1>
len2then
exit（len1）
exit（len2）;
n:
seq:
seq:
='
acmerandacm'
;
n:
=length（seq）;
writeln（lps（seq,1,n））;
4.var
map:
array[1..100,1..100]oflongint;
sum,weight,visit:
n,i,x,y,ans,ansn:
proceduredfs（node:
longint）;
v,maxw:
visit[node]:
sum[node]:
maxw:
forv:
=1tondobegin
if（map[node][v]=0）or（visit[v]<
0）thencontinue;
dfs（v）;
inc（sum[node],sum[v]）;
ifsum[v]>
maxwthenmaxw:
=sum[v];
ifn-sum[node]>
maxwthen
=n-sum[node];
weight[node]:
=maxw;
fillchar（map,sizeof（map）,0）;
fillchar（sum,sizeof（sum）,0）;
fillchar（weight,siz
升级会员 