第四届绍兴市小学生信息学奥林匹克试题(PASCAL).docVIP

第四届绍兴市小学生信息学奥林匹克试题(PASCAL).doc

  1. 1、有哪些信誉好的足球投注网站(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
  2. 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  3. 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
  4. 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
  5. 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们
  6. 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
  7. 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
第四届绍兴市少儿信息学竞赛试题 (小学组 PASCAL语言 二小时完成) ●●全部试题答案都要求写在答卷纸上,写在试卷上一律无效●● 选择一个正确答案代码(A/B/C/D),填入每题的括号内(每题2分,每题只有一个正确答案,多选或错选都无分。共30分) 1、现有的计算机都是采用( )提出的存储程序和二进制的原理制造的。 A.图灵 B.冯·诺伊曼 C.爱因斯坦 D.布尔 2、计算机的存储系统中,能被CPU直接存取的是( )。 A.内存储器 B.磁盘存储器 C.CD-ROM D.外存储器 3、下列可选项,都是硬件的是( )。 A.Windows、ROM和CPU B.WPS、RAM和显示器 C.ROM、RAM和Pascal D.硬盘、光盘和软盘 4、应用软件是专业人员为各种应用目的而编制的程序,以下( )是应用软件。 A.操作系统 B.文字处理软件 C.数据库管理系统 D.语言处理程序 5、以下是关于计算机病毒的说法,不正确的是( )。 A.病毒属于计算机软件 B.病毒属于硬件 C.病毒具有破坏性、传播性、可激发性、潜伏性、隐蔽性等特点 D.若软盘染上病毒,格式化软盘可以清除病毒 6、计算机网络的最大优点是( )。 A. 资源共享 B.运算速度加快 C.计算精度提高 D.内存容量增大 7、计算机网络中,互连的各种数据终端,是按( )相互通信。 A.网络协议 B.连线 C.以太网 D.数据格式 8、电子邮件的邮箱( )。 A.在ISP的服务器上 B.在你申请的网站的服务器上 C.在Outlook Express里 D.在Outlook Express里的电脑里 9、与十六进制3D相等的数是( )。 A.60 B.2 C.(76)8 D.2 10.Windows中,不能在显示属性中设置的是_____ 。 A. 屏幕刷新率 B. 屏幕保护程序 C. 系统日期 D. 墙纸的设置 11、给定队列的入队顺序1,2,3,共有几种可能的出队序列( )。 A.3 B.2 C.1 D.4 12、如果一棵满二叉树有n个叶结点,则这棵树的结点总数为( )。 A.2n B.2n-1 C.2n+1 D.n2-1 13、下列哪个选项不是程序设计的基本控制结构( )。 A.顺序结构 B.分支结构 C.循环结构 D.数据结构 14、在Pascal程序设计中,我们可以利用( )语句使程序终止运行。 A.halt B.end C.break D.quit 15、产生100至300之间的随机整数(Random),且包含100、300两个整数的表达式是( )。 A.random(100)+200 B.random(200)+100 C.random(201)+100 D.random(300) 二、问题求解(每题5分,共10分) 1、一个栈的进栈序列为1,2,3,4,请问,出栈序列一共有多少种? 2、绍兴市信息学竞赛临近,某校要组队参加竞赛,要从12名学生中选4名参加比赛,其中少儿组2名,初中组2名,请问共有几种组队方法? 三、阅读程序,写出程序的正确运行结果(7+7+8+8=30分) 1、program test01; var x,y:integer; begin readln(x,y); x:=x+y; y:=x-y; x:=x-y; write(x, ,y); end. 输入:3 7 输出: 2、program test02; var x:longint; n,i:integer; begin readln(n); x:=1; for i:=1 to n do x:=x*i; writeln(x); end. 输入:8 输出: 3、program test03; function f(n:integer):integer; begin if n=0 then f:=1 else if n0

文档评论(0)

taotao0b + 关注
实名认证
文档贡献者

该用户很懒,什么也没介绍

1亿VIP精品文档

相关文档