小学信息技术奥赛试题.docx

1、小学信息技术奥赛试题小学生计算机奥林匹克竞赛初赛试题（时间：90分钟） 姓名： 学校： 总分： 一、 单项选择题（每小题2分，共40分）1、 操作系统是对（ ）进行管理的系统软件。A、软件 B、硬件 C、应用程序 D、计算机资源2、今年义乌市小学生计算机奥赛中使用的计算机语言仍是（ ）。A、Free Pascal B、C+ C、Turbo Pascal D、Turbo C3、2008年中科院研制成功的“曙光5000”超级计算机，又刷新了我国计算机的最高运算速度，它每秒运算超过了（ ）。 A、100亿次 B、1000亿次 C、100万亿次 D、1000万亿次4、执行b:=10;for i:=0

2、to b do b:=b+1; 之后，变量i、b的值分别为（ ）。 A、20，20 B、10，21 C、21，21 D、10，205、与二进制数100110101相等的十六进制数是（ ）。 A、135 B、465 C、9A1 D、5316、根据条件判断的结果，来选择程序执行方向的程序结构称为（ ）。 A、顺序结构 B、分支结构 C、树形结构 D、菜单结构7、若Var A:array0.10of integer;定义了数组A，则A数组需要的内存空间为（ ）。A、22Byte B、20KB C、22KB D、20Bit8、中央处理器每执行一个（ ），就可以完成一次基本运算或判断。 A、语句 B、指

3、令 C、程序 D、软件9、表达式Trunc(sqrt(18236 div 100 mod 100)的值为（ ）。 A、9 B、6 C、82 D、010、内存储器的每一个存储单元，都对应一个唯一的序号，作为它的（ ）。 A、内容 B、指令 C、程序 D、地址11、描述网络数据传输速率的单位是BPS，其含义是（ ）。 A、每秒传输数据多少公里 B、每秒传输数据多少万公里 C、每秒传输多少二进制位 D、每秒传输多少个数据12、10)用画笔(Paintbrush)绘制图形并存储在文件中,该图形文件的文件名缺省的后缀为( )。 A) .jpg B) .bmp C) .gif D).tiff13、下面布尔

4、表达式的值为true 的是（ ）。 A、chr(ord(b)+1)b B、(12323)and(12323) C、21000 D、not(Aa)14、产生10-30之间（包括10、30）的随机整数表达式为（ ）。 A、random(10)+20 B、random(20)+10 C、random(30)+10 D random(21)+1015、下列Pascal表达式当中正确的是（ ）。 A、(x+y)(x-y) B、(bc)*(a+2) C、m/2+2n D、(b+1)*2+1)*2+1)*2+116、执行i:=0;while iy then writeln(x div y) else wri

5、teln(x mod y); end. 输入：34 26 输出： （2） var a:array0.8 of integer; i:integer; Begin For i:=1 to 8 do ai:=I; For i:=1 to 4 do begin A0:=ai;ai:=a9-i;a9-i:=a0; End; For i:=1 to 8 do write(ai:2); Writeln;End. 输出：5、program progam1;var u: array 0.3 of integer; a, b, c, x, y, z: integer;begin read(u0, u1, u2,

6、 u3); a := u0 + u1 + u2 + u3 - 5; b := u0 * (u1 - u2 div u3 + 8); c := u0 * u1 div u2 * u3; x := (a + b + 2) * 3 - u(c + 3) mod 4; y := (c * 100 - 13) div a div (ub mod 3 * 5); if(x+y) mod 2 = 0) then z := (a + b + c + x + y) div 2; z := (a + b + c x - y) * 2; writeln(x + y - z);end.输入：2 5 7 4 输出： 。

7、(4) var a,b:integer; Procedure tt(x:integer;var y:integer); Begin X:=x+y; Y:=x-y; End; Begin A:=7;b:=8;tt(a,b);Writeln(a:3,b:3);tt(a-b,b);writeln(a:3,b:3);end.（3） var s,s1,s2:string;I,j,len:integer; Begin Readln(s); len:=length(s); s1:=;s2:=;j:=0; for i:=1 to len do begin If (si=0)and(si=a)and(si=A)

8、and(si0 then _writeln（s);end.2，“振荡”冒泡排序： 将n个整数从小到大排序（n1000），下面的程序是对普通冒泡法排序的一种改进：先从一端开始扫描，进行比较，然后改变下一趟扫描的方向，作同样的处理，使冒炮过程来回“振荡”进行，并逐步缩小范围，直到n个数都排好为止。 var n，i :interger； a: ; procedure shakesort（x : interger） var I,h,t,k :interger； b :boolean； begin h:=1;t:=x; repeat ； for i:=h to do if aiai+1 then beg

9、in k :=ai；ai :=ai+1 ；ai+1:=k b :=false； end； t :=t-1； for i；=t-1 downto h do if then begin k:=ai； ai:=ai+1； ai+1:=k； b :=false； end； h :=h+1； until b； end； begin randomize； readln（n）； for i :=1 to n do ai:=random（1000）+1； ； for i:=1 to n do write（ai:4）； writeln end。 一DCCBA BABAD CBCDD ABCAB二（1）61、（n-1） (2)下午3点（或15点）三 (1)8 (2)8 7 6 5 4 3 2 1 (3) 418 IsToday （4）7 7 7 0四 1、（1）di （2）1（或s+1） （3）n-1 （4）（di-di+1） （5）s：=s+1（或inc(s)） 2 、（1）array1.1000 of integer （2）b:=true （3）t-1 （4）aiai+1 (或 ai+1ai+1 (或 ai+1ai) （5）shakesort（n感谢您的阅读，祝您生活愉快。