第十二届绍兴市少儿信息学奥赛--初赛试题(PASCAL)[优秀范文五篇].pdfVIP

第十二届绍兴市少儿信息学奥赛--初赛试题(PASCAL)[优秀范文五篇].pdf

  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 )[优秀 范文五篇] 第一篇:第十二届绍兴市少儿信息学奥赛--初赛试题(PASCAL) 第十二届绍兴市少儿信息学竞赛 (PASCAL 版 试卷) 第十二届绍兴市少儿信息学竞赛 初 赛 试 题 (小学组 PASCAL 语言 二小时完成) ●●全部试题答案都要求写在答卷纸上,写在试卷上一律无效●● 一、选择一个正确答案代码(A/B/C/D ),填入每题的括号内 (每题2 分,每题只有一个正确答案,多选无分。共 20 分) 1.我们要养成正确的键盘输入习惯,那么请问按正确指法击 T 键, 应使用() A)右手食指 2 .每个不同的二进制数可以表示一种颜色,如果一幅图像有256 种颜色,最少需要几位二 进制数来表示?() A)8 C)128 3 .以下运算结果为False 的是() A)not(55) 4 .在Free Pascal 中运行某一程序时,返回如下图所示的错误信 息,这是由于()B)(5=4)and(77)C)not(false)D)(54)or(5=5) B)16 D)256 B)右手中指 C)左手食指 D)左手中指 A)找不到输入文件 C)输入变量的值与变量的类型不匹配 5 .二维数组A 的每个元素是由 6 个字符组成的串。其行下标从 0 到 8 ,其列下标从0 到 9 ,若按行优先存储,元素A[7][4]的起始地址 与当 A 按列优先存储时()的起始地址相同,设每个字符占一个字节。 A)A[2][8] 主办:绍兴市科协、绍兴市教育局 承办:绍兴科技馆、绍兴市教育教学研究院 协办:绍兴市青少年 科技教育协会、绍兴市互联网协会(2014 年 4 月 12 日) 第十二届绍兴市少儿信息学竞赛 (PASCAL 版 试卷) 图中的“围观”数主要体现了该用户微博信息的() A)安全性 B)真伪性 C)共享性 D)载体依附性 二、根据要求回答问题:(5 +5 =10 分 )1.地球人都知道斐波那 契数列的递推关系式为 : f(1)1  f(2)1 f(n)f(n1)f(n2)  现 在 给 你 一 列 数 2,3,6,8,8,4,2,„ ,如果用 f (n )表示这个数列的第 n 个数,请写出这个 递推式。 2 .学校里共有 12 间宿舍 ,大宿舍住 8 人 ,中宿舍住 7 人 ,小宿 舍住 5 人 ,现在每间宿舍都住满了,共住了 80 个人 ,问大、中、小宿 舍各有多少间? 三 、阅读程序并写出运行结果 (8 +8 +8 +8+8 =40 分 ): 1.program test1;var a,b,c,d,e,ans: integer;begin readln(a,b,c);d:=a+b;ans:=trunc((d+e)/(c-a));e:=abs(b- c);writeln(ans);end . 输入:1 2 5 输出 :______________ 主办:绍兴市科协、绍兴市教 育局 承办:绍兴科技馆、绍兴市教育教学研究院 协办:绍兴市青少年 科技教育协会、绍兴市互联网协会(2014 年 4 月 12 日) 第十二届绍兴市少儿信息学竞赛 (PASCAL 版 试卷) 4 . program test4;var i,j,k,n:integer;a:array[1..100] of boolean;begin read(n);for i:=1 to n do a[i]:=true;for i:=1 to n do begin j:=i;while j=n do begin a[j]:=not(a[ j]);j:=j+i;end;end;for i:=1 to n do if a[i]=true then write(0, )else write(1, ); end.输入:8 输出:____________ 5 .

文档评论(0)

单元金卷 + 关注
实名认证
文档贡献者

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

1亿VIP精品文档

相关文档