2016年东莞市小学生程序设计竞赛镇区选拨赛笔试题
●● 全部试题答案均要求写在答卷纸上，写在试卷纸上一律无效 ●●
一． 单项选择题 （共20题，每题1.5分，共计30分。每题有且仅有一个正确答案） 1、计算机中的目录结构是以 形式组织的( )。
A、网状结构 B、树状结构 C、分页结构 D、链接形式
2、微型机在工作中尚末进行存盘操作，突然电源中断，则计算机中（ ）全部丢失，再次通电也不能恢复。
A、已输入RAM中的数据和程序 B、ROM中的信息 C、ROM和RAM的信息 D、硬盘中的信息 3、将二进制数11011化为十进制数是
A、27 B、63 C、33 D、19 4、ASCII码的含义是（ ）。
A、计算机可处理字符的唯一编码 B、美国信息交换标准代码 C、数字的二进制编码 D、 二→十进制转换码 5、IT的含义是（ ）。
A、通信技术 B、信息技术 C、网络技术 D、信息学
6、设A=True，B=False，C=True，D=False，以下逻辑运算表达式值为真的是（ ）。 A．(A∧B)∨(C∧D∨﹁A) B．(B∨C∨D) ∧D∧A C．((﹁A∧B) ∨C)∧﹁D D．A∧（D∨﹁C）∧B 7、 关于HTML语言下面哪种说法是正确的：
A、HTML实现了文本、图形、声音乃至视频信息的统一编码。 B、HTML全称为超文本标记语言。
C、网上广泛使用的Flash动画都是由HTML编写的。 D、HTML也是一种高级程序设计语言。
8、一片容量为 8GB 的 SD 卡能存储大约（ ）张大小为 2MB 的数码照片。 A、4000 B、2000 C、1600 D、16000
9、有人认为，在个人电脑送修前，将文件放入回收站中就是已经将其删除了。这种想法是（ ）。 A、正确的，将文件放入回收站意味着彻底删除、无法恢复 B、不正确的，只有将回收站清空后，才意味着彻底删除、无法恢复
C、不正确的，即使将回收站清空，文件只是被标记为删除，仍可能通过恢复软件找回 D、不正确的，只要在硬盘上出现过的文件，永远不可能被彻底删除 10、下列各个数中，最小的数是( )。 A、(11011001)2 B、 (75)10 C、(2A)16 D、 (37) 8
11、目前计算机芯片（集成电路）制造的主要原料是（ ），它是一种可以在沙子中提炼出的物质。 A、硅
B、铜
C、锗
D、铝
D、 CPU
12、目前个人电脑的（ ）市场占有率最靠前的厂商包括Intel、AMD等公司。 A、显示器
B、 鼠标
C、内存
1 / 6
13、在计算机内部用来传送、存贮、加工处理的数据或指令都是以（ ）形式进行的。 A、二进制码 B、八进制码 C、十进制码 D、智能拼音码 14、计算机的软件系统通常分为（ ） A、硬件系统和软件系统 C、系统软件和应用软件
B、高级软件和一般软件 D、军用软件和民用软件
15、计算机网络最主要的优点是（ ）。
A、运算速度快 B、共享资源 C、精度高 D、存储容量大 16、下列描述计算机病毒的特性中，（ ）不是正确的。 A. 潜伏性. B. 传染性. C. 高速性 D. 危害性
17、根据《计算机软件保护条例》，中国公民开发的软件享有著作权的是（ ） A、 不论何人、何地及发表与否的软件。 C、 只有单位发表的软件。
B、 只有公开发表的软件。
D、 只有个人在国内公开发表的软件。
18、在十六进制表示法中，字母 A 相当于十进制中的（ ）。 A. 9 B. 10 C.15 D.16 19、LAN的含义是（ ）。
A、因特网 B、城域网 C、广域网 D、局域网
20、在Pascal语言中，判断整数a等于0或b等于0或c等于0的正确的条件表达式是（ ）。 A．not ((a<>0) or (b<>0) or (c<>0)) B．not ((a<>0) and (b<>0) and (c<>0)) C．not ((a=0) and (b=0)) or (c<>0) D．(a=0) and (b=0) and (c=0)
二． 问题求解（共2题，每空5分，共计10分）
1、求144的约数有多少个？（所谓144的约数，就是指能整除144的数）
2、有336个苹果，252个橘子，210个梨，用这些水果，取多可以分成多少份同样的礼品？在每份礼品中，苹果、橘子、梨各有多少个？
三、阅读程序写结果（共4题，每题8分，共计32分） 1、
var x:integer; begin x:=21; repeat
write(x,' '); x:=x-4; until x<10; end. 2、
var x,i,j,k:integer; begin
for i:=1 to 3 do
2 / 6
begin x:=10;
for j:=i to 4 do for k:=j to 5 do x:=x+1; end;
writeln('x=',x); end. 3、 Const
SIZE = 100; Var
n, i, sum, x : Integer;
a : Array[1..SIZE] Of Integer; Begin
Readln(n);
FillChar(a, SizeOf(a), 0); For i := 1 To n Do Begin
Read(x); Inc(a[x]); End; i := 0; sum := 0;
While sum < (n DIV 2 + 1) Do Begin
Inc(i);
sum := sum + a[i]; End; Writeln(i); End.
输入： 11
4 5 6 6 4 3 3 2 3 2 1 输出：__________________ 4．
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];
3 / 6