第十四届全国青少年信息学(计算机)奥林匹克分区联赛初赛汇总_信息学奥林匹克竞赛
第十四届全国青少年信息学(计算机)奥林匹克分区联赛初赛汇总由刀豆文库小编整理，希望给你工作、学习、生活带来方便，猜你可能喜欢“信息学奥林匹克竞赛”。
第十四届全国青少年信息学奥林匹克联赛初赛试题（提高组 Pascal 语言 二小时完成）
●● 全部试题答案均要求写在答卷纸上，写在试卷纸上一律无效 ●●
一、单项选择题（共10题，每题1.5分，共计15分。每题有且仅有一个正确答案）。
1.在以下各项中，（）不是操作系统软件。
Symbian 2．微型计算机中，控制器的基本功能是（）。
A.控制机器各个部件协调工作 B.实现算术运算和逻辑运算 C.存储各种控制信息 D.获取外部信息
3.设字符串S=”Olympic”，S的非空子串的数目是（）。A.29 B.28 C.16 D.17 E.7 4．完全二叉树共有2*N-1个结点，则它的叶节点数是（）。
A.N-1 B.2*N C.N D.2N-1 E.N/2 5．将数组{8, 23, 4, 16, 77,-5, 53, 100}中的元素按从大到小的顺序排列，每次可以交换任意两个元素，最少需要交换（）次。
A.4 B.5 C.6 D.7 E.8 6．设栈S的初始状态为空，元素a，b，c，d，e，f依次入栈S，出栈的序列为b，d，c，f，e，a，则栈S的容量至少应该是（）。A.6 B.5 C.4 D.3 E.2 7.与十进制数28.5625相等的四进制数是（）。
A.123.21 B.131.22 C.130.22 D.130.21 E.130.20 8． 递归过程或函数调用时，处理参数和返回地址，通常使用一种称为（）的数据结构。
A.队列 B.多维数组 C.线性表 D.链表 E.栈
E.存放程序和数据 A.Solaris B.Linux C.Sybase D.Windows Vista E.9.TCP/IP是一组构成互联网基础的网络协议，字面上包括两组协议：传输控制协议（TCP）和网际协议（IP）。TCP/IP 协议把Internet网络系统描述成具有四个层次功能的网络模型,其中提供源节点和目的节点之间的信息传输服务，包括寻址和路由器选择等功能的是（）。
A.链路层 B．网络层 C.传输层 D.应用层 E.会话层
10． 对有序数组{5, 13, 19, 21, 37, 56, 64, 75, 88, 92, 100}进行二分查找，等概率的情况下查找成功的平均查找长度（平均比较次数）是（）。A.35/11 B.34/11 C.33/11 D.32/11 E.34/10
二、不定项选择题（共10题，每题1.5分，共计15分。每题正确答案的个数大于或等于1。多选或少选均不得分）。
11.在下列关于图灵奖的说法中，正确的有（）。
A.图灵奖是美国计算机协会于1966年设立的，专门奖励那些对计算机事业作出重要贡献的个人
B.图灵奖有“计算机界诺贝尔奖”之称
C.迄今为止，还没有华裔计算机科学家获此殊荣
D.图灵奖的名称取自计算机科学的先驱、英国科学家阿兰·图灵 12．计算机在工作过程中，若突然停电，（）中的信息不会丢失。A.硬盘 B.CPU C.ROM D.RAM 13.设A=true，B=false，C=true，D=false，以下逻辑运算表达式值为真的有（A.(A∧B)∨(C∧D∨⌝A)B.((⌝A∧B)∨C)∧⌝D C.(B∨C∨D)∨D∧A D.A∧(D∨⌝C)∧B 14．Web2.0是近年来互联网的热门概念之一，其核心思想是互动与分享。下列网站中，（是典型的Web2.0应用。A.Sina B.Flickr C.Yahoo D.Google 15.(2008)10 +(5B)16的结果是（）。
A.(833)16 B.(2099)10 C.(4063)8(100001100011)2 16.二叉树T，已知其先根遍历是1 2 4 3 5 7 6（数字为结点的编号，以下同），后根遍历是4 2 7 5 6 3 1，则该二叉树的可能的中根遍历是（）。）D.）A.4 2 1 7 5 3 6 B.2 4 1 7 5 3 6 C.4 2 1 7 5 6 3 D.2 4 1 5 7 3 6 17.面向对象程序设计（Object-Oriented Programming）是一种程序设计的方法论，它将对象作为程序的基本单元，将数据和程序封装在对象中，以提高软件的重用性、灵活性和扩展性。下面关于面向对象程序设计的说法中，正确的是（）。
A.面向对象程序设计通常采用自顶向下设计方法进行设计。
B.面向对象程序设计方法具有继承性（inheritance）、封装性（encapsulation）、多态性（polymorphism）等几大特点。
C.支持面向对象特性的语言称为面向对象的编程语言，目前较为流行的有C++、JAVA、C#等。
D.面向对象的程序设计的雏形来自于Simula语言，后来在SmallTalk语言的完善和标准化的过程中得到更多的扩展和对以前思想的重新注解。至今，SmallTalk语言仍然被视为面向对象语言的基础。
18.设T是一棵有n个顶点的树，下列说法正确的是（）。
A.T是连通的、无环的 B.T是连通的，有n-1条边 C.T是无环的，有n-1条边 D.以上都不对 19.NOIP竞赛推荐使用的语言环境有（）。
A.Dev-C++ B.Visual C++ C.free pascal D.Lazarus 20.在下列防火墙（firewall）的说法中，正确的有（）。
A.防火墙是一项协助确保信息安全的设备，其会依照特定的规则，允许或是限制数据通过
B.防火墙可能是一台专属的硬件或是安装在一般硬件上的一套软件
C.网络层防火墙可以视为一种 IP 数据包过滤器，只允许符合特定规则的数据包通过，其余的一概禁止穿越防火墙
D.应用层防火墙是在 TCP/IP的“应用层”上工作，可以拦截进出某应用程序的所有数据包
三．问题求解（共2题，每题5分，共计10分）
1．有6个城市，任何两个城市之间都有一条道路连接，6个城市两两之间的距离如下表所示，则城市1到城市6的最短距离为_____________。
2．书架上有21本书，编号从1到21，从其中选4本，其中每两本的编号都不相邻的选法一共有______种。
四．阅读程序写结果（共4题，每题8分，共计32分）1.var i,a,b,c,d:integer;f:array[0..3] of integer;begin for i:=0 to 3 do read(f[i]);a := f[0] + f[1] + f[2] + f[3];a := a div f[0];b := f[0] + f[2] + f[3];b := b div a;
c :=(b * f[1] + a)div f[2];d := f[(b div c)mod 4];if(f[(a + b + c + d)mod 4] > f[2])then begin a := a + b;writeln(a);end else begin c := c + d;writeln(c);end;end.输入：9 19 29 39 输出：_______________ 2．procedure foo(a,b,c:integer);begin if a>b then foo(c,a,b)else writeln(a, ',', b, ',', c)end;var a,b,c:integer;begin read(a, b, c);foo(a,b,c);end.输入：2 1 3 输出:__________ 3．procedure f(a,b,c:integer);begin write(a, b, c, '/');if(a = 3)and(b = 2)and(c = 1)then exit;if b
s:string;i,j,len,k:integer;begin read(s);len:=length(s);for i:=1 to len do if(ord(s[i])>= ord('A'))and(ord(s[i])b)then begin
t := a;a := b;b := t;end;end;function FindKth(left,right,n:integer):integer;var tmp,value,i,j:integer;begin if left = right then exit(left);tmp:= random(right-left)+ left;swap(a[tmp],a[left]);value := ①;i := left;j := right;while i
if in then begin dec(i);exit(⑥);end;exit(i);end;var i:integer;begin randomize;ans :=-1;
m:=5;for i:=1 to m do read(a[i]);read(n);ans:= FindKth(1,m,n);writeln(a[ans]);end.2．（矩阵中的数字）有一个n*n(1
var n,k,answerx,answery:integer;a:array[1..5000,1..5000] of integer;procedure FindKPosition;var i,j:integer;begin i:=n;j:=n;while j>0 do begin if a[n,j]
while a[i,j]k do begin while(②)and(i>1)do dec(i);while(③)and(j
begin read(n);for i:=1 to n do for j:=1 to n do read(a[i,j]);read(k);FindKPosition;writeln(answerx, ' ', answery);end.
