- 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 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(n1)f(n2) 现 在 给 你 一 列 数
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 .
您可能关注的文档
最近下载
- 呼吸衰竭ppt(共40张PPT).pptx VIP
- 7.1《风景谈》课件(共41张PPT)(含音频+视频).pptx VIP
- QXT3传感器中文操作手册.pdf VIP
- 病理科医疗质量自查表.docx VIP
- 菲亚特博悦说明书.docx VIP
- 2014-6-30电力变电站钢结构装配式建筑、围墙、防火墙.pdf VIP
- 上海市市东实验学校2022-2023学年高一10月月考语文试题.pdf VIP
- 《半导体物理与器件》教学大纲.docx VIP
- 2025青海公司所属华电(格尔木)能源有限公司面向华电系统内外招聘180人笔试备考试题及答案解析.docx VIP
- 人教版道德与法治四年级上册教案.docx VIP
文档评论(0)