《2011noip初赛pascal普及组试题》由会员分享，可在线阅读，更多相关《2011noip初赛pascal普及组试题（11页珍藏版）》请在金锄头文库上搜索。
1、 CCF NOIP2011 初赛 普及组 Pascal 1 第十七届全国青少年信息学奥林匹克联赛初赛试题 （ 普及组普及组 Pascal 语言语言 两小时完成两小时完成 ） 全部试题答案均要求写在答卷纸上，写在试卷纸上一律无效全部试题答案均要求写在答卷纸上，写在试卷纸上一律无效 一、一、单项选择题（单项选择题（共共 20 题，每题题，每题 1.5 分，共计分，共计 30 分。每题有且仅有一个正确分。每题有且仅有一个正确选项。选项。 ） 1在二进制下，1101001 + （ ） = 1110110。 A. 1011 B. 1101 C. 1010 D. 1111 2字符“0”的 ASCII 码为
2、 48，则字符“9”的 ASCII 码为（ ）。 A. 39 B. 57 C. 120 D. 视具体的计算机而定 3一片容量为 8GB 的 SD 卡能存储大约（ ）张大小为 2MB 的数码照片。 A. 1600 B. 2000 C. 4000 D. 16000 4摩尔定律（Moores law）是由英特尔创始人之一戈登摩尔（Gordon Moore）提出来的。根据摩尔定律，在过去几十年以及在可预测的未来几年，单块集成电路的集成度大约每（ ）个月翻一番。 A. 1 B. 6 C. 18 D. 36 5 无向完全图是图中每对顶点之间都恰有一条边的简单图。 已知无向完全图G有 7个顶点，则它共有（
3、）条边。 A. 7 B. 21 C. 42 D. 49 6寄存器是（ ）的重要组成部分。 A. 硬盘 B. 高速缓存 C. 内存 D. 中央处理器（CPU） 7如果根结点的深度记为 1，则一棵恰有 2011 个叶结点的二叉树的深度最少是（ ）。 A. 10 B. 11 C. 12 D. 13 8. 体育课的铃声响了，同学们都陆续地奔向操场，按老师的要求从高到矮站成一排。每个同学按顺序来到操场时， 都从排尾走向排头， 找到第一个比自己高的同学， 并站在他的后面。这种站队的方法类似于（ ）算法 。 A. 快速排序 B. 插入排序 C. 冒泡排序 D. 归并排序 9一个正整数在二进制下有 100 位
4、，则它在十六进制下有（ ）位。 CCF NOIP2011 初赛 普及组 Pascal 2 A. 7 B. 13 C. 25 D. 不能确定 10有人认为，在个人电脑送修前，将文件放入回收站中就是已经将其删除了。这种想法是（ ）。 A. 正确的，将文件放入回收站意味着彻底删除、无法恢复 B. 不正确的，只有将回收站清空后，才意味着彻底删除、无法恢复 C. 不正确的，即使将回收站清空，文件只是被标记为删除，仍可能通过恢复软件找回 D. 不正确的，只要在硬盘上出现过的文件，永远不可能被彻底删除 11广度优先搜索时，需要用到的数据结构是（ ）。 A. 链表 B. 队列 C. 栈 D. 散列表 12在使
5、用高级语言编写程序时，一般提到的“空间复杂度”中的“空间”是指（ ）。 A. 程序运行时理论上所占的内存空间 B. 程序运行时理论上所占的数组空间 C. 程序运行时理论上所占的硬盘空间 D. 程序源文件理论上所占的硬盘空间 13在含有 n 个元素的双向链表中查询是否存在关键字为 k 的元素，最坏情况下运行的时间复杂度是（ ）。 A. O(1) B. O(log n) C. O(n) D. O(n log n) 14生物特征识别，是利用人体本身的生物特征进行身份认证的一种技术。目前，指纹识别、虹膜识别、人脸识别等技术已广泛应用于政府、银行、安全防卫等领域。以下不属于生物特征识别技术及其应用的是（
6、 ）。 A. 指静脉验证 B. 步态验证 C. ATM 机密码验证 D. 声音验证 15现有一段文言文，要通过二进制哈夫曼编码进行压缩。简单起见，假设这段文言文只由 4 个汉字“之”、 “乎”、 “者”、 “也”组成，它们出现的次数分别为 700、600、300、200。那么，“也”字的编码长度是（ ）。 A. 1 B. 2 C. 3 D. 4 16关于汇编语言，下列说法错误的是（ ）。 A. 是一种与具体硬件相关的程序设计语言 CCF NOIP2011 初赛 普及组 Pascal 3 B. 在编写复杂程序时，相对于高级语言而言代码量较大，且不易调试 C. 可以直接访问寄存器、内存单元、以及
7、I/O 端口 D. 随着高级语言的诞生，如今已完全被淘汰，不再使用 17（ ）是一种选优搜索法，按选优条件向前搜索，以达到目标。当探索到某一步时， 发现原先选择并不优或达不到目标，就退回一步重新选择。 A. 回溯法 B. 枚举法 C. 动态规划 D. 贪心法 181956 年（ ）授予肖克利（William Shockley）、巴丁（John Bardeen）和布拉顿（Walter Brattain），以表彰他们对半导体的研究和晶体管效应的发现。 A. 诺贝尔物理学奖 B. 约翰冯诺依曼奖 C. 图灵奖 D. 高德纳奖（Donald E. Knuth Prize） 19对一个有向图而言，如果每
8、个节点都存在到达其他任何节点的路径， 那么就称它是强连通的。 例如， 右图就是一个强连通图。事实上，在删掉边（ ）后，它依然是强连通的。 A. a B. b C. c D. d 20从 ENIAC 到当前最先进的计算机，冯诺依曼体系结构始终占有重要的地位。冯诺依曼体系结构的核心内容是（ ）。 A. 采用开关电路 B. 采用半导体器件 C. 采用存储程序和程序控制原理 D. 采用键盘输入 二二、问题求解（共问题求解（共 2 题，每题，每题题 5 分，共计分，共计 10 分）分） 1每份考卷都有一个 8 位二进制序列号。当且仅当一个序列号含有偶数个 1 时，它才是有效的。例如，00000000、0
9、1010011 都是有效的序列号，而 11111110 不是。那么，有效的序列号共有_个。 2定义字符串的基本操作为：删除一个字符、插入一个字符和将一个字符修改成另一个字符这三种操作。将字符串 A 变成字符串 B 的最少操作步数，称为字符串 A 到字符串 B 的编辑距离。字符串“ABCDEFG“到字符串“BADECG“的编辑距离为_。 三三、阅读程序写结果（共阅读程序写结果（共 4 题，每题题，每题 8 分分，共计共计 32 分）分） 1. var CCF NOIP2011 初赛 普及组 Pascal 4 n, m, i, ans : integer; begin readln(n, m);
10、ans := 0; i := n; while i = 0) and (teli = A) and (teli bk1k2 then good := false; if good then begin writeln(i, , j); ; end; end; if not haveAns then writeln(There is no answer); end. 2（大整数开方）（大整数开方）输入一个正整数 n（1n 0 then ans.len := a.len + b.len else ans.len := a.len + b.len - 1; end; times := ans; en
11、d; function add(a, b : hugeint) : hugeint; /计算大整数 a 和 b 的和 var i : integer; ans : hugeint; begin fillchar(ans.num, sizeof(ans.num), 0); if a.len b.len then ans.len := a.len else ans.len := b.len; for i := 1 to ans.len do begin ans.numi := ; ans.numi + 1 := ans.numi + 1 + ans.numi div 10; ans.numi :=
12、 ans.numi mod 10; CCF NOIP2011 初赛 普及组 Pascal 9 end; if ans.numans.len + 1 0 then inc(ans.len); add := ans; end; function average(a, b : hugeint) : hugeint; /计算大整数 a 和 b 的平均数的整数部分 var i : integer; ans : hugeint; begin ans := add(a, b); for i := ans.len downto 2 do begin ans.numi - 1 := ans.numi - 1 +
13、 ( ) * 10; ans.numi := ans.numi div 2; end; ans.num1 := ans.num1 div 2; if ans.numans.len = 0 then dec(ans.len); average := ans; end; function plustwo(a : hugeint) : hugeint; /计算大整数 a 加 2 后的结果 var i : integer; ans : hugeint; begin ans := a; ans.num1 := ans.num1 + 2; i := 1; while (i = 10) do begin a
14、ns.numi + 1 := ans.numi + 1 + ans.numi div 10; ans.numi := ans.numi mod 10; inc(i); CCF NOIP2011 初赛 普及组 Pascal 10 end; if ans.numans.len + 1 0 then ; plustwo := ans; end; function over(a, b : hugeint) : boolean; /若大整数 ab 则返回 1，否则返回 0 var i : integer; begin if ( ) then begin over := false; exit; end; if a.len b.len then begin over := true; exit; end; for i := a.len downto 1 do begin if a.numi b.numi then begi
