- 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语言 二小时完成)
●●全部试题答案都要求写在答卷纸上,写在试卷上一律无效●●
一、选择一个正确答案代码(A/B/C/D),填入每题的括号内(每题2分,每题只有一个正确答案,多选无分。共20分)
1. 我们要养成正确的键盘输入习惯,那么请问按正确指法击键,应使用()右手食指右手中指左手食指左手中指()
A) 8 B) 16 C) 128 D) 256
3.以下运算结果为False的是 ( )
A) not (55) B) (5=4) and (77) C) not (false) D) (54) or (5=5)
4.在Free Pascal中运行某一程序时,返回如下图所示的错误信息,这是由于( )
A) 找不到输入文件 B) 源程序存在2号语法错误 C) 输入变量的值与变量的类型不匹配 D) Pascal编译器没有正确安装
5.二维数组A的每个元素是由6个字符组成的串。其行下标从0到8,其列下标从0到9,
若按行优先存储,元素A[7][4]的起始地址与当A按列优先存储时( )的起始地址相同,
设每个字符占一个字节。
A) A[2][8] B) A[3][9] C) A[5][7] D) A[0][8]
6.ASCII码表中的大写字母Z后有6个其他字符,接着便是小写字母。现在已知:字母Y的
ASCII码为(1011001)2,则字母a的ASCII码用十六进制表示是 ( )
A) 61H B) 62H C) 63H D) 64H
7.下列软件不能用于浏览网页的是 ( )
A) Firefox B) Internet Explorer C) Access D) 腾讯TT
8.路人甲要拍摄一些学校风景照片,并对拍摄的照片进行处理,下列采集工具、加工软件可实
现这一功能的是( )
A) 数码相机、photoshop B) 扫描仪、goldwave C) 数码摄像机、goldwave D) 手机、access
9.某电影的评价如图所示:
图中的评价方式属于( )
A) 个人推荐 B) 统计评价 C) 专家推荐 D) 核心刊物评价
10.某用户微博的相关统计如图所示:
图中的“围观”数主要体现了该用户微博信息的( )
A) 安全性 B) 真伪性 C) 共享性 D) 载体依附性
二、根据要求回答问题:(5+5=10分)
1. 地球人都知道斐波那契数列的递推关系式为:
现在给你一列数2,3,6,8,8,4,2,…,如果用f(n)表示这个数列的第n个数,请写出这个递推式。
2.学校里共有12间宿舍,大宿舍住8人,中宿舍住7人,小宿舍住5人,问中、小宿舍有多少间?var
a,b,c,d,e,ans: integer;
begin
readln(a,b,c);
d:=a+b;
e:=abs(b-c);
ans:=trunc((d+e)/(c-a));
writeln(ans);
end.
输入:1 2 5 输出:______________ Begin
Readln(n,m);
n:=n mod 7;
m:=m mod 5;
If nm then writeln(n)
else writeln(m)
End.
输入:输出:____________
var
n,x,i,temp,j,count:longint;
begin
readln(n,x);
for i:=1 to n do
begin
temp:=i;
while temp0 do
begin
j:=temp mod 10;
temp:=temp div 10;
if j=x then inc(count);
end;
end;
writeln(count);
end.
输入:100 5
输出:____________
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, )
您可能关注的文档
最近下载
- 人力资源管理课后答案德斯勒.docx
- 马克思主义新闻观十二讲之第九讲实现新闻传播权利与社会责任的统一.docx VIP
- 国际航运管理 全套课件.PPT VIP
- 财务共享服务教学课件4第四章 费用报销流程.pptx VIP
- 手术患者意外伤害预防.pptx VIP
- 2025年新人教版数学7年级上册整册同步教学课件.pptx
- 广告理论与实务:各类广告媒介PPT教学课件.pptx VIP
- 第1课 课题一《课外生活小调查·周末生活我采访》(教学设计)-2024-2025学年三年级上册综合实践活动浙教版.docx VIP
- 广告理论与实务:印刷媒体广告PPT教学课件.pptx VIP
- 铭记历史·开创未来--2025-2026学年高一上学期纪念抗日战争胜利80周年爱国主义教育主题班会.pptx VIP
文档评论(0)