2022年长沙市小学生计算机奥林匹克竞赛初赛模拟试题及参考答案

2022年长沙市小学生计算机奥林匹克竞赛初赛试题（语言：TurboPascal时间：90分钟）

参赛证号姓名学校总分一、单项选择题（每小题2分，共40分）1、被称为“现代计算机之父”的是（）A、图灵B、冯.诺依曼C、比尔.盖茨D、巴贝奇2、计算机在工作时突然停电，则（）中的信息全部丢失，来电之后也不能恢复。A、ROM和RAMB、ROMC、RAMD、硬盘3、扫描仪、绘图仪、触摸屏、音箱当中有（）中具有输出功能。A、1B、2C、3D、44、计算机能为我们做很多工作，下列缩写CAD、CAM、CAI分别对应的是（）A、计算机辅助设计/辅助制造/辅助教学B、计算机辅助制造/辅助设计/辅助教学C、计算机辅助教学/辅助设计/辅助制造D、计算机辅助设计/辅助教学/辅助制造5、二进制数00100100与00010100的和是（）A、00101000B、00111100C、00110100D、001110006、程序设计的三种基本结构是（）A、主程序、函数、过程B、顺序、选择、循环C、程序首部、说明总分、执行部分D、for、while、repeat7、在Windows中，“回收站”是（）的一块区域。A、硬盘B、内存C、软盘D、光盘8、在TurboPascal语言环境下，快捷组合键Ctrl+F的功能是（）A、下拉File子菜单B、保存程序C、关闭窗口D、新开窗口9、互联网上最常用的浏览器称为（）A、wordB、QQC、ＩＥＤ、TCP/IP10、某计算机的硬盘有100G,等于（）字节。A、100B、100×1000C、100×1024×1024D、100×1024×1024×102411、下列数据类型中不是构造类型的是（）A、集合类型B、数组类型C、文件类型D、枚举类型12、Integer类型的数据范围是（）A、-32767～32767B、0～32767C、-32768～32767D、0～6553513、下列表达式的值为FALSE的是（）A、Odd(True)B、Round((Abs))<10C、Not(‘9’<’100’)D、Ord(Chr(Pred(8)))>=714、R：＝Random(100)+1产生一个随机数R，R的取值范围是（）A、0<=R<=100B、0<R<=100C、1<=R<100D、1<=R<=10115、判断变量ch的值是否为小写字母，下列表达式正确的是（）A、not(ch<’a’)or(ch>’z’B、’a’<=ch<=’z’C、(ch>=a)and(ch<=z)D、ch>=’a’andch<=’z’16、设n是实型变量，下列表达式能使n四舍五入保留两位小的是（）A、Round(n*100)/100B、Round(n/100)*100C、Trunc(n*100)/100D、Trunc(n/100)*10017、设a、b、c都是整型变量，由键盘输入如下三行数据123回车456回车789回车下列语句组中不能使a=1、b=7的是（）A、Readln(a,b,b,b,b,b,b,c,c);B、Readln(a);Readln;Readln(b);C、Readln(a,c,c,c);Read(b);D、Readln(a,c,c);Readln(b,c,c);18、设有变量说明VARI,j:integer;x,y:Real;a,b:Boolean;c:Char;下列赋值语句中正确的是（）A、i:=i+x;B、b:=Ord(c>’c’);C、a:=i=j;D、i:=xmody;19、表达式Chr(Ord(‘A’)+4))的值是（）A、’D’B、‘E’C、69D、10120、设a［1］＝1,a［2］＝2，a[3]=3,a[4]=4,a[5]=5,a[6]=6,且i=1,j=2,k=3,m=4下列变量的值等于3的是（）A、a[i*j]B、a[a[k-i]+3]C、a[mdivj]D、a[a[j+k-2]]

二、

问题解答（每小题5分，共10分）1、

马路上有编号为1～9的9盏路灯，为了节约用电，现要关掉其中的三盏灯，但两端的灯不能关，也不能同时关掉相邻的灯。问：符合要求的关灯方法共有多少种？答：共有种。2、

A、B、C三人中一位是工人，一位是教师，一位是律师。已知：C仅比律师年龄大，A和教师不同岁，B比教师年龄小。问：A、B、C分别是什么身分？答：是工人，是教师，是律师。

三、阅读程序，写出程序的结果（每小题5分，共20分）（1）

varI,j:integer;beginforI:=1to5dobeginforj:=2toIdoifImod2=0thenwrite(‘A’)elsewrite(‘B’);writeln;end;end.输出：（2）

varI,j,n:integer;b:array[1..10]of0..2;beginn:=2022;j:=0;whilen>0dobeginj:=j+1;b[j]:=nmod3;n:=ndiv3;end;fori:=jdownto1dowrite(b[i]);writeln;end.输出：（3）

vars:string;I,len:integer;BeginS:=’olympicgames2022’;S:=’’+s;len:=length(s);Fori:=1tolendobeginCh:=s[len];If(ch>=’0’)and(ch<=’9’)thenbeginDelete(s,len,1);insert(ch,s1);End;If(s[i]=’’)and(i<>len)thens[i]:=’－’;End;Writeln(s);End.输出：(4)vara,b,x:integer;Procedurems(a,b:integer;varc:integer);Begina:=3*a;b:=4*b;c:=a-b+c;end;begina:=1;b:=2;x:=3;ms(a,b,x);writeln(a,b:5,x:5);end.输出：四、

完善程序（每空3分，共30分）1、

最佳评分值：输入10个评委对某项目的评分值（正整数），计算出他们评分的平均值，然后找出最佳评分值，即：最接近平均值的那些数（这些数可能大于、也可能小于平均值）。VarI,n:integer;b,s:real;a:;beginfori:=1to10doread(a[i]);s:=;fori:=2to10dos:=s+a[i];s:=s/10;n:=1;fori:=2to10doif<thenn:=I;b:abs(a[n]-s);forI;=1to10doifthenwrite(a[i]:3);writeln;end.2、

高精度阶乘：正整数A的阶乘，数学中定义为：A！＝1×2×3×……×A，如：3！＝1×2×3.现在输入一个正整数n(n<=50)，要求计算出1～n的每一个整数的阶乘的高精度结果（即：结果为全部有效数字）。下面的程序中采用加法代替乘法的方法计算阶乘，如：3！＝2！×3＝2！×2！×2！。输出格式：每行打印一个数的阶乘如：输入：n=3输出：1!=12!=23!=6

Constmax=80;VarI,j,k,n,r:integer;a,b:array[1..max]ofinteger;BeginWrite(‘n=’);readln(n);a[1]:=1;writeln(‘1!=’,1);Forj:=1todobeginb:=a;fork:=1todofori:=1tomaxdobeginr:=;ifr>=10then:=a[i+1]+1;a[i]:=rmod10;end;k:=max;whiledok:=k-1;write(j+1,’!=’);fori:=kdownto1dowrite(a[i]);writeln;end;end.一、单选题BCCADBAACDDCBBAADCBD二、填空题

1、10