2007年长沙市小学生计算机奥林匹克竞赛初赛试题.doc
上传人:sy****28 上传时间:2024-09-10 格式:DOC 页数:11 大小:84KB 金币:16 举报 版权申诉
预览加载中,请您耐心等待几秒...

2007年长沙市小学生计算机奥林匹克竞赛初赛试题.doc

2007年长沙市小学生计算机奥林匹克竞赛初赛试题.doc

预览

免费试读已结束,剩余 1 页请下载文档后查看

16 金币

下载此文档

如果您无法下载资料,请参考说明:

1、部分资料下载需要金币,请确保您的账户上有足够的金币

2、已购买过的文档,再次下载不重复扣费

3、资料包下载后请先用软件解压,在使用对应软件打开

2007年长沙市小学生计算机奥林匹克竞赛初赛试题(语言:TURBOPASCAL时间:120分钟)参赛证号姓名学校总分一、单项选择题(每小题2分,共40分)1、世界上第一台电子计算机于1946年诞生于美国,它是出于()的需要。A、军事B、工业C、农业D、教学2、下列属于计算机存储器的是()A、资源管理器B、CPUC、打印机D、硬盘3、国标码的一个汉字在计算机中占用()个字节。A、1B、2C、4D、84、在windows窗口操作时,能使窗口大小恢复原状的操作是()A、单击“最小化”按钮B、单击“关闭”按钮C、双击窗口标题栏D、单击“最大化”按钮5、下列有关电脑病毒的描述中,错误的是()A、电脑病毒实质是人设计的计算机程序B、上网下载信息可能会感染电脑病毒C、电脑病毒发作时会影响电脑的正常工作D、电脑病毒是宇宙射线对电脑辐射产生的结果6、下列internet的各功能中,错误的是()A、程序编译B、邮件传送C、远程教学D、信息查询7、我们将pascal程序存盘时,不可能保存到计算机的()中。A、内存B、硬盘C、软盘D、光盘8、(2004)10+(11)2的结果是()。A、(2727)8B、(FA7)16C、(2015)10D、(11111010111)29、在Pascal语言环境下,用快捷键组合ALT+F5可以()A、放大窗口B、编译执行C、查看输出D、保存程序10、字符类型的标准定义符是()A、stringB、chrC、charD、str11、下列变量名当中不正确的是()A、boyB、studentC、w123D、6A12、在var下,用A:array[10..15]ofreal定义的A数组包含()个元素。A、10B、15C、6D、513、表达式round(7.8)*5div3–ord(odd(trunk(25.6)))的值是()A、13B、12C、11D、1014、判断a和b都不等于0的条件表达式正确的是()A、not((a=0)or(b=0))B、a<>0andb<>0C、not((a=0)and(b=0))D、(a<>0)or(b<>0)15、产生一个随机整数赋给R,要求100≤R≤200,正确的语句是()A、R:=random(200)+100B、R:=random(101)+100C、R:=random(99)+100D、R:=random(100)+10016、在字符串’ababcdefacbefdabccbad’中出现最多的字母出现了()次。A、2B、4C、5D、617、把编号为1到13的纸牌唱针摆成一圈,然后从1号纸牌开始顺时针数1,2,3,……,一圈又一圈,当数到某个数n时,对应的纸牌编号为()A、nmod13B、(n-1)mod13+1C、nmod13+1D、(n+1)mod1318、整数A的值为12345,则Adiv10mod1000的结果是()A、5B、345C、34D、23419、若s=’#ABCDABCD#’,则pos(‘AB’,insert(‘AC’,copy(s,4,6),3))的值是()A、5B、3C、2D、620、数据3.14、’A’、’abc’、0、maxint当中有()个不能作为for循环的初、终值。A、1B、2C、3D、4二、问题解答(每小题5分,共10分)1、把4封信投入到3个邮筒中,共有多少种不同的投法?答:共有种不同的投法。2、猪八戒有一大堆西瓜,每天吃掉一半,还多吃两个,8天就全部吃完。问:当初猪八戒共有多少个西瓜?答:当初猪八戒共有个西瓜。三、阅读程序,写出程序的结果(每小题5分,共20分)①、vara,b,c,d,e:integer;begina:=79;b:=46;c:=57;d:=10;e:=1;if(a>c)and(b>c)thend:=d+eelseifd+10<ethend:=e+10elsed:=e+a;writeln(‘d=’,d);end.输出:______________②、vari,k:integer;begink:=1;i:=1;whilei<2008dobegink:=-k;i:=i+1;end;writeln(k*i);end.输出:______________③、vari,j,t:integer;a:array[0..10]ofinteger;beginfori:=1to10dobeginread(a[i]);a[i]:=a[i]-a[i-1];end;fori:=1to9doforj:=i+1to10doifa[i]>a[j]thenbegint:=a[i];a[i]:=a[j