第十八届全国青少年信息学奥林匹克联赛初赛普及组 Pascal 语言试题竞赛时间 :2012 年 10 月 13 日 14:30~16:30 选手注意 : 试题纸共有 10 页, 答题纸共有 2 页, 满分 100 分请在答题纸上作答, 写在试题纸上的一律无效不得使用任何电子设备 ( 如计算器

Size: px

Start display at page:

Download "第十八届全国青少年信息学奥林匹克联赛初赛普及组 Pascal 语言试题竞赛时间 :2012 年 10 月 13 日 14:30~16:30 选手注意 : 试题纸共有 10 页, 答题纸共有 2 页, 满分 100 分请在答题纸上作答, 写在试题纸上的一律无效不得使用任何电子设备 ( 如计算器"

逸吹樊
4 years ago
Views:

1 第十八届全国青少年信息学奥林匹克联赛初赛普及组 Pascal 语言试题竞赛时间 :2012 年 10 月 13 日 14:30~16:30 选手注意 : 试题纸共有 10 页, 答题纸共有 2 页, 满分 100 分请在答题纸上作答, 写在试题纸上的一律无效不得使用任何电子设备 ( 如计算器手机电子词典等 ) 或查阅任何书籍资料一单项选择题 ( 共 20 题, 每题 1.5 分, 共计 30 分 ; 每题有且仅有一个正确选项 ) 1. 计算机如果缺少 ( ), 将无法正常启动 A. 内存 B. 鼠标 C. U 盘 D. 摄像头 2. ( ) 是一种先进先出的线性表 A. 栈 B. 队列 C. 哈希表 ( 散列表 ) D. 二叉树 3. 目前计算机芯片 ( 集成电路 ) 制造的主要原料是 ( ), 它是一种可以在沙子中提炼出的物质 A. 硅 B. 铜 C. 锗 D. 铝 4. 十六进制数 9A 在 ( ) 进制下是 232 A. 四 B. 八 C. 十 D. 十二 5. ( ) 不属于操作系统 A. Windows B. DOS C. PhotoShop D. NOI Linux 6. 如果一棵二叉树的中序遍历是 BAC, 那么它的先序遍历不可能是 ( ) A. ABC B. CBA C. ACB D. BAC 7. 目前个人电脑的 ( ) 市场占有率最靠前的厂商包括 Intel AMD 等公司 A. 显示器 B. CPU C. 内存 D. 鼠标 CCF NOIP2012 初赛普及组 Pascal 1

2 8. 使用冒泡排序对序列进行升序排序, 每执行一次交换操作将会减少 1 个逆序对, 因此序列 5, 4, 3, 2, 1 需要执行 ( ) 次交换操作, 才能完成冒泡排序 A. 0 B. 5 C. 10 D 年诞生于美国宾夕法尼亚大学的 ENIAC 属于 ( ) 计算机 A. 电子管 B. 晶体管 C. 集成电路 D. 超大规模集成电路 10. 无论是 TCP/IP 模型还是 OSI 模型, 都可以视为网络的分层模型, 每个网络协议都会被归入某一层中如果用现实生活中的例子来比喻这些层, 以下最恰当的是 ( ) A. 中国公司的经理与叙利亚公司的经理交互商业文件第 4 层中国公司经理叙利亚公司经理第 3 层中国公司经理秘书叙利亚公司经理秘书第 2 层中国公司翻译叙利亚公司翻译第 1 层中国邮递员叙利亚邮递员 B. 军队发布命令第 4 层司令第 3 层军长 1 军长 2 第 2 层师长 1 师长 2 师长 3 师长 4 第 1 层团长 1 团长 2 团长 3 团长 4 团长 5 团长 6 团长 7 团长 8 CCF NOIP2012 初赛普及组 Pascal 2

3 C. 国际会议中, 每个人都与他国地位对等的人直接进行会谈第 4 层英国女王瑞典国王第 3 层英国首相瑞典首相第 2 层英国外交大臣瑞典外交大臣第 1 层英国驻瑞典大使瑞典驻英国大使 D. 体育比赛中, 每一级比赛的优胜者晋级上一级比赛第 4 层奥运会第 3 层全运会第 2 层省运会第 1 层市运会 11. 矢量图 (Vector Image) 图形文件所占的存储空间较小, 并且不论如何放大缩小或旋转等都不会失真, 是因为它 ( ) A. 记录了大量像素块的色彩值来表示图像 B. 用点直线或者多边形等基于数学方程的几何图元来表示图像 C. 每个像素点的颜色信息均用矢量表示 D. 把文件保存在互联网, 采用在线浏览的方式查看图像 12. 如果一个栈初始时为空, 且当前栈中的元素从栈底到栈顶依次为 a, b, c( 如右图所示 ), 另有元素 d 已经出栈, 则可能的入栈顺序是 ( ) A. a, d, c, b B. b, a, c, d C. a, c, b, d D. d, a, b, c 栈顶栈底 c b a 13. ( ) 是主要用于显示网页服务器或者文件系统的 HTML 文件内容, 并让用户与这些文件交互的一种软件 A. 资源管理器 B. 浏览器 C. 电子邮件 D. 编译器 14. ( ) 是目前互联网上常用的服务协议 A. HTTP B. FTP C. POP3 D. Telnet CCF NOIP2012 初赛普及组 Pascal 3

4 15. ( ) 就是把一个复杂的问题分成两个或者更多的相同或相似的子问题, 再把子问题分成更小的子问题直到最后的子问题可以简单的直接求解而原问题的解就是子问题解的并 A. 动态规划 B. 贪心 C. 分治 D. 搜索 16. 地址总线的位数决定了 CPU 可直接寻址的内存空间大小, 例如地址总线为 16 位, 其最大的可寻址空间为 64KB 如果地址总线是 32 位, 则理论上最大可寻址的内存空间为 ( ) A. 128KB B. 1MB C. 1GB D. 4GB 17. 蓝牙和 Wi-Fi 都是 ( ) 设备 A. 无线广域网 B. 无线城域网 C. 无线局域网 D. 无线路由器 18. 在程序运行过程中, 如果递归调用的层数过多, 会因为 ( ) 引发错误 A. 系统分配的栈空间溢出 B. 系统分配的堆空间溢出 C. 系统分配的队列空间溢出 D. 系统分配的链表空间溢出 19. 原字符串中任意一段连续的字符组成的新字符串称为子串则字符串 AAABBBCCC 共有 ( ) 个不同的非空子串 A. 3 B. 12 C. 36 D 仿生学的问世开辟了独特的科学技术发展道路人们研究生物体的结构功能和工作原理, 并将这些原理移植于新兴的工程技术之中以下关于仿生学的叙述, 错误的是 ( ) A. 由研究蝙蝠, 发明雷达 B. 由研究蜘蛛网, 发明因特网 C. 由研究海豚, 发明声纳 D. 由研究电鱼, 发明伏特电池二问题求解 ( 共 2 题, 每题 5 分, 共计 10 分 ) 1. 如果平面上任取 n 个整点 ( 横纵坐标都是整数 ), 其中一定存在两个点, 它们连线的中点也是整点, 那么 n 至少是 2. 在 NOI 期间, 主办单位为了欢迎来自全国各地的选手, 举行了盛大的晚宴在第十八桌, 有 5 名大陆选手和 5 名港澳选手共同进膳为了增进交流, 他们决定相隔就坐, 即每个大陆选手左右相邻的都是港澳选手每个港澳选手左右相邻的都是大陆选手那么, 这一桌共有种不同的就坐方案注意 : 如果在两个方案中, 每个选手左边相邻的选手均相同, 则视为同一个方案 CCF NOIP2012 初赛普及组 Pascal 4

5 三阅读程序写结果 ( 共 4 题, 每题 8 分, 共计 32 分 ) 1. var a, b, c, d, e, ans : integer; readln(a, b, c); d := a+b; e := b+c; ans := d+e; writeln(ans); 输入 :1 2 5 输出 : 2. var n, i, ans : integer; readln(n); ans := 0; for i := 1 to n do if (n mod i) = 0 then ans := ans+1; writeln(ans); 输入 :18 输出 : 3. var n, i, j : integer; a : array[1..100, ] of integer; function solve(x, y : integer) : integer; var u, v : integer; CCF NOIP2012 初赛普及组 Pascal 5

6 if x = n then solve := a[x, y]; exit; u := solve(x + 1, y); v := solve(x + 1, y + 1); if u > v then solve := a[x, y] + u else solve := a[x, y] + v; readln(n); for i := 1 to n do for j := 1 to i do read(a[i, j]); writeln(solve(1, 1)); 输入 : 输出 : 4. var n, ans, i, j : integer; s : string; function get(i : integer) : char; if i <= n then CCF NOIP2012 初赛普及组 Pascal 6

7 get := s[i] else get := s[i-n]; readln(s); n := length(s); ans := 1; for i := 2 to n do for j := 0 to n-1 do if get(i+j) < get(ans+j) then ans := i; break; end else if get(i+j) > get(ans+j) then break; for j := 0 to n-1 do write(get(ans+j)); writeln; 输入 :CBBADADA 输出 : 四完善程序 ( 前 2 空每空 2 分, 后 8 空每空 3 分, 共计 28 分 ) 1. ( 坐标统计 ) 输入 n 个整点在平面上的坐标对于每个点, 可以控制所有位于它左下方的点 ( 即 x y 坐标都比它小 ), 它可以控制的点的数目称为战斗力依次输出每个点的战斗力, 最后输出战斗力最高的点的编号 ( 如果若干个点的战斗力并列最高, 输出其中最大的编号 ) const var SIZE = 100; CCF NOIP2012 初赛普及组 Pascal 7

8 x, y, f : array[1..size] of integer; n, i, j, max_f, ans : integer; readln(n); for i := 1 to n do readln(x[i], y[i]); max_f := 0; for i := 1 to n do f[i] := 1 ; for j := 1 to n do if (x[j] < x[i]) and ( 2 ) then 3 ; if 4 then max_f := f[i]; 5 ; for i := 1 to n do writeln(f[i]); writeln(ans); 2. ( 排列数 ) 输入两个正整数 n, m (1 n 20, 1 m n), 在 1~n 中任取 m 个数, 按字典序从小到大输出所有这样的排列例如输入 :3 2 输出 : const CCF NOIP2012 初赛普及组 Pascal 8

9 SIZE = 25; var used : array[1..size] of boolean; data : array[1..size] of integer; n, m, i, j, k : integer; flag : boolean; readln(n,m); fillchar(used, sizeof(used), false); for i := 1 to m do data[i] := i; used[i] := true; flag := true; while flag do for i := 1 to m-1 do write(data[i],' '); writeln(data[m]); flag := 1 ; for i := m downto 1 do 2 ; for j := data[i]+1 to n do if used[j] = false then used[j] := true; data[i] := 3 ; flag := true; break; if flag then for k := i+1 to m do for j := 1 to 4 do if used[j] = false then data[k] := j; used[j] := true; CCF NOIP2012 初赛普及组 Pascal 9

10 break; 5 ; CCF NOIP2012 初赛普及组 Pascal 10

B. 军队发布命令第 4 层司令第 3 层军长 1 军长 2 第 2 层师长 1 师长 2 师长 3 师长 4 第 1 层团长 1 团长 2 团长 3 团长 4 团长 5 团长 6 团长 7 团长 8 C. 国际会议中, 每个人都与他国地位对等的人直接进行会谈第 4 层英国女王瑞典国王

B. 军队发布命令第 4 层司令第 3 层军长 1 军长 2 第 2 层师长 1 师长 2 师长 3 师长 4 第 1 层团长 1 团长 2 团长 3 团长 4 团长 5 团长 6 团长 7 团长 8 C. 国际会议中, 每个人都与他国地位对等的人直接进行会谈第 4 层英国女王瑞典国王第十八届全国青少年信息学奥林匹克联赛初赛提高组 Pascal 语言试题竞赛时间 :2012 年 10 月 13 日 14:30~16:30 选手注意 : 试题纸共有 15 页, 答题纸共有 2 页, 满分 100 分请在答题纸上作答, 写在试题纸上的一律无效不得使用任何电子设备 ( 如计算器手机电子词典等 ) 或查阅任何书籍资料一单项选择题 ( 共 10 题, 每题 1.5 分, 共计