当前位置:首页 >> 学科竞赛 >>

2008年石狮市信息学奥赛初赛试题(普及组pascal)


“电信杯”2008 年石狮市信息学奥林匹克竞赛试题 ( 普及组 Pascal 语言 二小时完成)
●● 全部试题答案均要求写在答卷纸上,写在试卷纸上一律无效 ●●

(共 20 题,每题 1.5 分,共计 30 分每题有且仅有一个正确答案) 一、单项选择题: 单项选择题: 1.2000 年度美籍华人姚期智,由于在伪随机数的生成算法、加密算法和通讯复杂

性等计 算机理论方面做出突出贡献,获得全球计算机界的最高奖是( ) 。 A.诺贝尔奖 B.图灵奖 C.沃尔夫奖 D.菲尔兹奖 2.在计算机系统中,最基本的输入输出模块 BIOS 存放在( ) 。 A.硬盘中 B.RAM 中 C.ROM 中 D.CPU 中 3.下列地址中,属于 B 类 IP 地址的是( ) 。 A.27.33.119.2 B.192.97.32.121 C.133.201.189.32 D.126.33.82.107 4.下面描述用多维数组表示的数据结构的语句中,不正确的是( ) 。 A.每个元素都必须一样 B.各维的下标范围必须一样 C.数组在内存中的地址是连续的 D.数组是随机存取的数据结构 5.某数列有 2000 个各不相同的单元,由低至高按序排列。现要对该数列进行二分法索, 在最坏的情況下,需检索( )个单元。 A.10 B.11 C.50 D.100 6.下面的程序段违反了算法的( )原则。 var n:integer; begin n:=1; while (n mod 2=1) do n:=n+2; write(n); end. A.健壮性 B.确定性 C.可行性 D.有穷性 7.已知一棵二叉树的前序遍历结果为 ADCGHIBEF,中序遍历的结果为 GCHIDAEBF,则这棵 树的深度为(根的深度为 1) ( ) 。 A.3 B.4 C.5 D.6 8.在字符串”shishiedu”中,共有长度为 4 的不同子串的个数是( ) 。 A.4 B.5 C.6 D.7 9. 计算机网络最突出的优点是( )。 A.计算精度高 B.内存容量大 C.运算速度快 D.连网的计算机能够相互共享资源 10.一个队列开始为空,数列 1,2,3,……按顺序进队,经过操作序列“进,进,出, 进,进,出,进,进,进,出,进,出”后,队列中的第 3 个元素是( )
(普及组 Pascal 语言)第 1 页(共 5 页)

A.3 B.5 C.7 D.8 11.在计算机存储系统中,下列哪一个的存取速度最快( ) 。 A.RAM B.高速缓存 C.硬盘 D.寄存器 12.下列哪个设备是输入设备,同时也是输出设备( ) 。 A.显示器 B.扫描仪 C.触摸屏 D.打印机 13.算式(2008)10-(5C)16+(130)8 的结果是( ) 。 A.(2006)10 B.(7D4)16 C.(11111011000)2 D.(3734)8 14. 计算机感染了计算机病毒, 每次使用计算机上网时, 计算机都会自动弹出许多 IE 窗口, 这一现象说明病毒具有( ) 。 A.隐蔽性 B.传染性 C.可触发性 D.表现性 15.二进制数 111.11 转换成十进制数是( ) 。 A.7.3 B.7.5 C.7.125 D.7.75 16. OUTLOOK 进行收发 E-mail, 用 需要设置收发服务器, 下列哪一个不是收发服务器 ( ) 。 A.SMTP B.POP3 C.FTP D.POP 17.表达式 28 div 4 mod 3 * trunc(3.875) 的值是( )。 A.7 B.4 C.3 D.2 18.一个栈的大小是 3,由输入序列 123456 得到的输出序列中可能出现的情形( ) 。 A.654321 B.213546 C.154236 D.126543 19.十进制数 25 和 18,进行“或”操作的结果是( ) 。 A.18 B.25 C.27 D.43 20.对一个数字串 45236718,每次删除一个数字,按原来顺序变成一个新数,使新数最小, 共删了 5 次,所得最小新数是 218,问第 4 次是删哪一个数字( ) 。 A.6 B.5 C.4 D.7 问题求解: 二、问题求解 (共 2 题,每题 5 分,共计 10 分) 1.马路上有编号为 1,2,3,……,9 的九盏路灯,为既节约用电,又能看清路面(不影 响走路照明) ,可以把其中的三只灯关掉,但不能同时关掉相邻的两盏或两盏以上的灯。在 两端的灯也不能关掉的情况下,求满足条件的关灯办法有_________种? 2.某游人上山,从前山上山的道路有 2 条,从后山上山的道路有 2 条,那么此游人从上山 到下山,不同的走法共有__________种? 读程序写结果: (共 4 题,每题 8 分,共计 32 分) 三、读程序写结果: 1.program pj01; var i,a,b,c,x,y:integer; p:array[0..4] of integer; begin y:=10; for i:=0 to 4 do read(p[i]); a:=(p[0]+p[1])+(p[2]+p[3]+p[4]) div 5; b:=p[0]+p[1] div ((p[2]+p[3])div p[4]); c:=p[0]*p[1] div p[2]; x:=a+b-p[(p[3]+3)mod 3];
(普及组 Pascal 语言) 2 页 第 (共 5 页)

if(x mod 2=1) then y:=y+(b*100-a) div(p[p[4] mod 3]*5) else y:=y+10+(b*100-c)div (p[p[4] mod 3]*5); writeln(x,',',y); end. 输入:6 4 5 7 3 输出: 2. program pj02; var a,b:integer; procedure pd(x:integer;var y:integer); begin x:=x+y; y:=x+y; end; begin a:=10;b:=8; pd(a,b);writeln(a:3,b:3); pd(b-a,b);writeln(a:3,b:3); end. 输出: 3. program pj04; var i,s,temp:integer; a:array[1..10]of integer; begin for i:=1 to 10 do read(a[i]); temp:=a[1];s:=a[1]; for i:=2 to 10 do begin if s<0 then s:=0; s:=s+a[i]; if s>temp then temp:=s; end; writeln('temp=',temp); end. 输入:-2 14 -3 5 7 8 -2 -21 15 7 输出: 4. program pj04; var i,j,s:integer;
(普及组 Pascal 语言)第 3 页(共 5 页)

b:array[0..5]of integer; begin s:=0; for i:=1 to 5 do b[i]:=i; j:=1; while j>0 do begin j:=5; while(j>0)and(b[j]=10+j-5) do j:=j-1; if j>0 then begin s:=s+1;b[j]:=b[j]+1; for i:=j+1 to 5 do b[i]:=b[j]+i-j; end; end; writeln(s); end. 输出: 2.5分,后6空,每空3分,共28 ) 28分) 四.完善程序 (前4空,每空2.5 4 2.5 6 3 28 1.每正整数都有约数,且不同整数的约数个数也不大一样。 以下程序的功能是找出 100 以内 (包括 100)约数个数仅有 4 个的正整数,例如正整数 6,它的约数有 1,2,3,6 共 4 个, 并且要求每行只能输出 5 个。 6 8 10 14 15 21 …… 程序如下: program pj05; var i,j,k,s:integer; begin k:=0 for i:=1 to 100 do begin ① ; for j:=1 to i do then s:=s+1; if ② if s=4 then begin write(i,' '); ③ ; ; if k mod 5=0 then ④ end;
(普及组 Pascal 语言)第 4 页(共 5 页)

end; end. 2.对 6~1000 内的偶数验证哥德巴赫猜想:任何一个大于 6 的偶数总可以分解为两个素数 (约数仅有 1 与其本身的数, 称之为素数或质数) 之和。 例如偶数 10, 可以分解为 10=3+7, 10=5+5。 以下程序的功能是列出 6~1000 内的所有偶数分解为两个素数之和形式, 如果一个 偶数可以分解为多个之和形式,仅输出一个即可。输出如下所示: 6=3+3 8=3+5 10=3+7 12=5+7 14=3+11 …… 程序如下: program pj06; const m=1000; var i,j,k,x:integer; function pd(n:integer):boolean;{素数判断} var i:integer; begin pd:=true; for i:=2 to n div 2 do if ⑤ then begin ⑥ ; exit; end; end; begin for i:=6 to ⑦ do if ⑧ then for j:=2 to i div 2 do if pd(j) then begin ⑨ ; if pd(x) then begin writeln(i,'=',j,'+',x); ⑩ ; end; end;

end.


相关文章:
1999年—2011年信息学奥赛提高组初赛试题PASCAL(附答案...
1999年—2011年信息学奥赛提高组初赛试题PASCAL(附...⑦ ; CCF NOIP2011 初赛 普及组 Pascal 13 江苏...15.(2008)10+ A.(833)16 (5B)16 的结果是()...
...信息学奥林匹克联赛初赛试题及答案(Pascal普及组)
第十六届全国青少年信息学奥林匹克联赛初赛试题及答案(Pascal普及组)_教学案例/设计_教学研究_教育专区。第十六届全国青少年信息学奥林匹克联赛初赛试题及答案(Pascal普...
...青少年信息学奥林匹克联赛初赛试题普及组pascal
(NOIP2007)第13届全国青少年信息学奥林匹克联赛初赛试题普及组pascal_IT/计算机_...可以不理睬数据库中的冗余数据 9.在下列各软件,不属于 NOIP 竞赛(复赛)推荐...
2013信息学竞赛初赛模拟试题(二)(普及组pascal)
2013信息学竞赛初赛模拟试题(二)(普及组pascal)_学科竞赛_初中教育_教育专区。2013 信息学竞赛初赛模拟试题(二)(普及组 pascal)一、选择题(共 20 题,每题 1.5...
1999年—2011年信息学奥赛提高组初赛试题PASCAL(附答案...
1999年—2011年信息学奥赛提高组初赛试题PASCAL(附答案...⑦ ; CCF NOIP2011 初赛 普及组 Pascal 13 江苏...15.(2008)10+ A.(833)16 (5B)16 的结果是()...
...信息学奥林匹克竞赛全国联赛初赛普及组Pascal试题【...
NOIP2013第十九届信息学奥林匹克竞赛全国联赛初赛普及组Pascal试题【整理版附答案】_学科竞赛_高中教育_教育专区。NOIP2013第十九届信息学奥林匹克竞赛全国联赛初赛普及...
小学信息奥试卷2009年石狮市信息学奥林匹克竞赛普及组...
年石狮市信息学奥林匹克竞赛普及组试卷( 语言) 2009 年石狮市信息学奥林匹克竞赛普及组试卷(Pascal 语言) 作者:林中清涧 来源:原创 人气:675 评论:0 推荐等级:...
2016年-第二十二届全国青少年信息学奥林匹克联赛初赛普...
2016年-第二十二届全国青少年信息学奥林匹克联赛初赛普及组Pascal语言真题试卷 第二十二届全国青少年信息学奥林匹克联赛初赛普及组 Pascal 语言试题 竞赛时间:2016 年...
第十届全国青少年信息学奥林匹克联赛初赛试题及答案
第十届全国青少年信息学奥林匹克联赛初赛试题及答案_学科竞赛_高中教育_教育专区...第十届全国青少年信息学奥林匹克联赛初赛试题 (普及组 Pascal 语言 二小时完成)...
...青少年信息学奥林匹克联赛初赛试题普及组pascal
NOIP2003)第九届全国青少年信息学奥林匹克联赛初赛试题普及组pascal_初三数学_数学_初中教育_教育专区。信息学竞赛真题 适合没有经验的学生做第...
更多相关标签:
信息学奥赛初赛试题 | 2016信息学奥赛初赛 | 信息学奥赛初赛 | noip2016普及组初赛 | noip2015普及组初赛 | noip2013普及组初赛 | noip2014普及组初赛 | noip普及组初赛试题 |