《2012年义乌市初中信息学奥林匹克竞赛试题（附答案）》由会员分享，可在线阅读，更多相关《2012年义乌市初中信息学奥林匹克竞赛试题（附答案）（7页珍藏版）》请在金锄头文库上搜索。
1、2012 年义乌市初中信息学奥林匹克竞赛试题初中组 pascal 两小时完成姓名： 一、单选（20 题，每题 1.5 分，共 30 分）1、与十六进制数 D7 等值二进制数是：（A） (A)11010111(B)11100111(C)11011110(D)111011102、目前，国际上普遍采用的一种字符编码是 ASCII 码（中文名称：美国信息交换标准码） ， 它的特点是右边 7 位二进制数是有效位，而最右边 1 位是二进制零。有一个扩展名为 txt 的纯文本文件，仅包含了 100 个英文字母，20 个标点符号和 80 个空格，那么它在 所占据的空间是：（A） (A)200B(B)200KB
2、(C)120B(D)120KB3、下列计算机设备中，属于存储设备是（B） (A)键盘(B)RAM(C)显示器(D)CPU4、下面是计算机操作系统是（D） (A)Free Pascal(B)Adobe Photoshop(C)Microsoft Word(D)Liunx5、下列关于计算机病毒的描述中，正确的是（C） (A)如果某人有感冒病毒，那么他使用的计算机就有可能感染病毒，并最终发展为计算 机病毒 (B)如果计算机在生产厂家组装时周围环境不好（有灰尘等） ，计算机就会有计算机病 毒 (C)计算机病毒实质上是一段计算机程序 (D)计算机病毒只能通过计算机网络传播6、关于网页中的超链接，下列说法
3、正确的是（A） (A)超链接的 HTML 标志是(B)一张网页只能包含一个超链接 (C)将网页保存为文本文件后，超链接依然存在 (D)超链接的对象只能是另一张网页7、下面列出的文件，不能用 windows 附件中画图程序打开的是（C）(A)apple.bmp(B)banana.jpg(C)orange.raw(D)pear.png（）8、下列说法中，错误的是（B） (A)CPU 的基本功能是执行指令 (B)控制器的基本功能实现算术运算和逻辑运算 (C)在一台计算机内部，一个内存地址编码对应唯一的一个内存单元 (D)第一台具有存储程序功能的计算机是 EDVAC9、计算机网络协议是指通信双方为了正
4、常通信而预先规定的一组规则、约定和标准。上网 浏览网页时使用到的主要协议是：（D） (A) TCP(B) SMTP(C) FTP(D) HTTP10、下列有关算法的理解，不正确的是：（C） (A)计算机算法必须要有结果输出 (B)算法的每一步必须是明确的、无异议的(C)对于 Pascal 的标准函数 sqrt(x)，如下调用“y:=sqrt(sqrt(x+1);”就是一种递归调用 (D)同非递归算法相比，解决同一个问题，递归算法占用的资源一般会更多11、在 Pascal 程序中，我们可以用下列哪个语句来强制退出整个循环？（C） (A)repeat(B) end (C) break (D) co
5、ntinue12、在 Pascal 表达式中，变量 a 的初始值是 24，变量 b 的初始值是 5，变量 c 的初始 值是 3。下列哪个表达式的运算值和其他不一样？（B） (A) sqrt(a+1) (B) trunc(a / b) (C) round(a / b) (D) c div a + b13、五个数字进栈的顺序依次为 1、2、3、4、5，则下列序列中不可能是出栈序列的是： （B） (A) 2、3、4、1、5 (B) 5、4、1、3、2(C) 2、3、1、4、5 (D) 1、5、4、3、214、数组在计算机内存中一般是按行优先的次序顺序连续存放的，如有以下 Pascal 数组定 义：a
6、 : array0.5,0.6 of integer;已知 a0,0的起始地址是 1000，则 a5,5的起始地址是：（B） (A) 1082 (B) 1080 (C) 1068 (D) 106615、对于一组数 6、13、27、29、52、27、81，现要对其从小到大排序， 采用下列哪种排序算法，其所花费的比较次数最少：（C） (A)选择排序 (B)冒泡排序 (C)插入排序 (D)前面三种算法的比较次数一样多16、已知一个顺序表由 1024 个从小到大排列的整数组成，那么依次采用顺序查找和二分 查找，最坏情况下的查找次数分别是：（A） (A) 1024、10 (B) 1、10 (C) 102
7、4、1024 (D) 1024、117、如图所示的一棵二叉树，其中序遍历的结果是：（A） (A) D、F、B、A、G、E、H、I、C (B) D、F、B、A、C、G、E、H、I (C) D、F、B、A、C、E、G、H、I (D) D、F、B、G、I、H、E、C、A18、某棵树共有 16 个结点，根结点所在位置是第 1 层，那么这棵树的高度最高是几层？ （A） (A) 16 (B) 17 (C) 4 (D) 519、完全二叉树的顺序存储方案是指将完全二叉树的结点从上至下、从左至右依次存放到 一个顺序结构的数组中。假定根结点存放在数组的 1 号位置，则 k 号结点的右孩子 如果存在的话，应当存放在
8、数组的几号位置？（B） (A) 2k (B) 2k+1 (C) k div 2 (D) (k+1) div 220、下列图中，不能用“一笔画” （经过每条边一次且仅一次）画出的图是：（B） (A)图 20.1(B)图 20.2(C)图 20.3(D)图 20.4二、问题求解（共 2 小题，每题 5 分，共 10 分） 1、班里委托你去买体操比赛要用的鞋服。到了服装店你发现带的钱只能买 70 件衣服 和 70 条裤子，或者 126 双鞋子。如果买的衣服、裤子和鞋子的数量不统一，就会因没法 配套而造成浪费，你可不想因此而破坏你办事高效的形象。经过计算后你发现可以买到同 样多的衣服、裤子和鞋子，并且
9、正好花光身上的钱。问：你买了多少套鞋服呢？45 2、 “!”叫做的阶乘，!= ( 1)( 2) 3 2 1。问：35!的末尾有 8 个零。如8!= 8 7 6 5 4 3 2 1 = 40320，8! 的末尾有 1 个零。 三、阅读程序（共 4 小题，每题 8 分，共 32 分） 1、 program ywnoip01; var x,y,z,d,tmp:real; begin readln(x,y,z); if x0 then begin tmp:=sqrt(d); write(-(y+tmp)/x/2:2:2); write( ); writeln(tmp-y)/x/2:2:2); end;
10、 if d=0 then writeln(-y/x/2:2:2); end; end.输入：1 3 -4 输出：-4.00 1.00 2、 program ywnoip02; var x,y,z,max:longint; begin readln(max); x:=0; y:=1; repeatz:=x+y; x:=y; y:=z; if z mod 2=0 then write(z, ); until (x+y)max; end.输入：200 输出：2 8 34 144 3、 program ywnoip03; const maxn=5000; var a:array0.maxn of in
11、teger; i,n,k,mid,x:integer; median:real; begin read(n); fillchar(a,sizeof(a),0); a0:=32767; for i:=1 to n do begin read(x); k:=i; while ak0 then decrypt:=stmp else decrypt:=s26; end; function crypt(c:char):char; begin case c of a.z: crypt:=decrypt(c, LC); A.Z: crypt:=decrypt(c, UC); #: crypt:= ; els
12、e crypt:=c; end; end; begin readln(s); for i:=1 to length(s) do write(crypt(si); end.输入：Dw#Wkh#Crr! 输出：At The Zoo! 四、完善程序（第 1 题每空 2 分，第 2 题每空 3 分，共 28 分）1、 【史密斯数】史密斯数是美国数学家发现的一种有趣的数：把这个数各个位置上的数字相加的结果，等于它的所有素数因子的每个数字相加的结果。如 9924 就是一个史密斯数，它质因数分解的结果是 9924 = 2 2 3 827，而 9 + 9 + 2 + 4 = 2 + 2 + 3 + 8 + 2
13、 + 7。以下程序输出不大于( 1) 的所有斯密斯数。自定义函数() 可以求出整数的各个位置上的数字之和；自定义函数() 可以对进行质因子分解，并求出质因子各个位置上的数字之和。 program ywnoip05; var i,max:integer;function f(x:integer):integer; beginF:=0; while x0 do beginf:=f+x mod 10; x:=x div 10; end; end; function g(x:integer):integer; var k,n:integer; begin k:=2; g:=0; n:=x; repea
14、t while x mod k=0 do beging:= g+f(k); x:=x div k; end; inc(k); until k*kn;if x1)then g:= g+f(x); end; begin readln(max); for i:=2 to max do if f(i)=g(i) then write(i, ); end.2. 【置车问题】国际象棋与中国象棋上的“车”行走规则都是横向或纵向的。因此同 一行或同一列有对方的“车”就会产生冲突。现在给你一个 nn 大小的棋盘，问如何放置 n 个“车”才能使它们都不产生冲突（即没有任何两个“车”是同一行或同一列的） 。程序中
15、try 过程用回溯算法来放置“车” ，flag 函数用于判断当前放置的“车”与前面的有无 冲突，有冲突的返回 true。 【输入样例】 3【输出样例】 1 2 3 1 3 2 2 1 3 2 3 1 3 1 2 3 2 1TOTOAL = 6【样例解释】3 个“车”放在 3 3 的棋盘上，每行打印一种放置方案：“1 2 3”即： 第一行的“车”放在第 1 列，第二行放在第 2 列，第三行放在第 3 列。 “1 3 2”即：第一行 的“车”放在第 1 列，第二行放在第 3 列，第三行放在第 2 列最后输出放置方案数共 6 种。 program ywnoip06; const maxn=100;
16、var x,y,n:integer; sum:longint; p:array1.maxn of integer; function flag(x:integer):boolean; var i:integer; begin flag:=false; for i:=1 to x-1 do if px=pi then flag:=true; end; procedure print; var i:integer; begin for i:=1 to n do write(pi, ); writeln ; end; procedure try(x:integer); var i:integer; begin ifxn(或 x=n+1)then begin inc(sum); print; exit; end; for i:
