注册 登录  
 加关注
   显示下一条  |  关闭
温馨提示!由于新浪微博认证机制调整,您的新浪微博帐号绑定已过期,请重新绑定!立即重新绑定新浪微博》  |  关闭

xiaochen7777的博客

http://player.youku.com/player.php/sid/X

 
 
 

日志

 
 
关于我

了如指掌,方能规划人生。是说人应该了解一下自己手上的掌纹,它能对你的人生进行导航。(Q号:1583223327),共同学习。

网易考拉推荐
 
 

第十一届全国青少年信息学奥林匹克联赛初赛试题 (普及组 pascal 语言 二小时完成)  

2014-08-04 21:39:04|  分类: 教书育人 |  标签: |举报 |字号 订阅

  下载LOFTER 我的照片书  |


●●全部试题答案要求写在答题纸上,写在试卷纸上一律无效●●

 

一.选择一个正确的答案代码(A/B/C/D/E),填入括号内(每题1.5分,共30分)

1.在字符串“ababacbabcbdecced”中出现次数最多的字母出现了( )次。

A.6  B.5  C.4  D.3  E.2

2.设全集I={a,b,c,d,e,f,g,h},集合A={a,b,c,d,e,f},B={c,d,e},C={a,d},那么集合A∩B∩~C为(   )。

A.{c,e}  B.{d,e}  C.{e}  D.{c,d,e}  E.{d,f}

3.和十进制数23的值相等的二进制数是( )。

A.10110  B.11011  C.11011  D.10111  E.10011

4.完全二叉树的交点个数为11,则它的叶结点个数为( )。

A.4  B.3  C.5  D.2  E.6

5.平面上有五个点A(5,3),B(3,5),C(2,1),D(3,3),E(5,1)。以这五点作为完全图G的顶点,每两点之间的直线距离是图G中对应边的权值。以下哪条边不是图G的最小生成树中的边(   )。

A.AD  B.BD  C.CD  D.DE  E.EA

6.Intel的首颗16位处理器是( )。

A.8088  B.80386  C.80486  D.8086  E.Pentium

7.处理器A每秒处理的指令时处理器B的2倍。某一特定程序P分别编译为处理器A和处理器B的指令,编译结果处理器A的指令数是处理器B的4倍。已知程序P在处理器A上执行需要1个小时,那么在输入相同的情况下,程序P在处理器B上执行需要(  )小时。

A.4  B.2  C.1  D.1/2  E.1/4

8.以下哪个不是计算机的输出设备( )。

A.音箱  B.显示器  C.打印机  D.扫描仪  E.绘图仪

9.下列活动中不属于信息学奥赛的系列活动的是( )。

A.NOIP  B.NOI  C.IOI  D.冬令营  E.程序员等级考试

10.以下断电之后仍能保存数据的是( )。

A.硬盘  B.寄存器  C.显存  D.内存  E.高速缓存

11.以下哪个软件不是及时通信软件( )。

A.网易泡泡  B.MSN Messenger  C.Google Talk  D.3DS Max  E.QQ

12.下列关于高级语言的说法错误的是( )。

A.Fortan是历史上的第一个面向科学计算的高级语言

B.Pascal和C都是编译执行的高级语言

C.C++是历史上的谝桓鲋С置嫦蚨韵蟮挠镅?br />   D.编译器将高级语言程序转变为目标代码

E.高级语言程序比汇编语言程序更容易从一种计算机移植到另一种计算机上

13.下列设备不具有计算功能的是( )。

A.笔记本电脑  B.掌上电脑  C.智能手机  D.电子计算机  E.液晶显示器

14.常见的邮件传输服务器使用( )协议接收邮件。

A.HTTP  B.SMTP  C.TCP  D.FTP  E.POP3

15.下列浏览器中,由微软公司开发的浏览器是( )

A.Internet Explore  B.Netcape  C.Opera  D.Firefox  E.Mozilla

16.一位艺术史学家有2000幅真彩色图像,每幅图像约占3M空间。如果将这些图像以位图形式保存在CD光盘上(一张CD光盘的容量按600M计算),大约需要(   )张CD光盘。

A.1  B.10  C.100  D.1000  E.10000

17.设A=true,B=false,C=false,D=true,以下逻辑运算表达式值为真的是( )。

A.(A∧B)∨(C∧D)  B.((A∧B)∨C)∧D  C.A∧((B∨C)∧D)

D.(A∧(B∨C))∨D  E.(A∨B)∧(C∧D)

18.(3725)8+(B)16的运算结果是( )。

A.(3736)8  B.(2016)10  C.(1111110000)2  D.(3006)10  E.(7B0)16

19.二叉树T的宽度优先遍历序列为A B C D E F G H

I,已知A是C的父交点,D是G的父交点,F是I的父交点,数中所有结点的最大深度为3,(根结点深度设为0),可知F的父结点是( )。

A.无法确定  B.B  C.C  D.D  E.E

20.设栈S的初始状态为空,元素a,b,c,d,e,f,g依次入栈,以下出栈序列不可能出现的是( )。

A.a,b,c,e,d,f,g  B.b,c,a,f,e,g,d  C.a,e,d,c,b,f,g

D.d,c,f,e,b,a,g  E.g,e,f,d,c,b,a

 

二.问题求解(请在空格处填上答案,每空5分,共10分)

1.将数组{32,74,25,53,28,43,86,47}中的元素按从小到大的顺序排列,每次可以交换任意两个元素,最少需要交换___次。

2.有3个课外小组:物理组,化学组和生物组。今有张、王、李、赵、陈、5名同学,已知张、王为物理组成员,张、李、赵为化学组成员,李、赵、陈为生物组成员。如果要在3个小组分别选出3位组长,一位同学最多只能担任一个小组的组长,共有___种选择方案。

 

三.阅读程序(共4题,每题8分,共计32分)

1.  var

a,b : integer;

begin

read(a);

b:=(a*(a*a))+1;

if b mod 3 = 0 then b := b div 3;

if b mod 5 = 0 then b := b div 5;

if b mod 7 = 0 then b := b div 7;

if b mod 9 = 0 then b := b div 9;

if b mod 11 = 0 then b := b div 11;

if b mod 13 = 0 then b := b div 13;

if b mod 15 = 0 then b := b div 15;

writeln((100*a-b) div 2);

end.

输入:10

输出:_____

2.  var

str : string;

i : integer;

begin

str := 'Today-is-terrible!';

for i := 7 to 11 do

if str[i] = '-' then str[i-1] := 'x';

for i := 13 downto 1 do

if str[i] = 't' then str[i+1] := 'e';

writeln(str);

end.

输出:_____

3.  var

a,b,c,p,q : integer;

r : array[0..2] of integer;

begin

read(a,b,c);

p := a div b div c;

q := b - c + a + p;

r[0] := a * p div q *q;

r[1] := r[0] * (r[0] - 300);

if (3 * q - p mod 3 <= r[0]) and (r[2] =r[2]) then

r[1] := r[r[0] div p mod 2]

else r[1] := r[r[0] div p mod 2];

writeln(r[0] - r[1]);

end.

输入:100 7 3

输出:_____

4.  var

str : string;

len,i,j : integer;

nchr : array[0..25] of integer;

mmin : char;

begin

mmin := 'z';

readln(str); len := length(str);

i := len;

while i>= 2 do begin

if str[i - 1] < str[i] then break; dec(i);

end;

if i = 1 then begin

writeln('No result!'); exit;

end;

for j := 1 to i - 2 do write (str[j] < mmin) then

fillchar(nchr,sizeof(nchr),0);

for j := i to len do begin

if (str[j] > str[i - 1]) and (str[j] < mmin) then

mmin := str[j];

inc(nchr[ord(str[j]) - ord('a')]);

end;

dec(nchr[ord(mmin) - ord('a')]);

inc(nchr[ord(str[i - 1]) - ord('a')]);

write(mmin);

for i := 0 to 25 do

for j := 1 to nchr[i] do

write(chr(i + ord('a')));

writeln;

end.

输入:zzyzcccbbbaaa

输出:_____

 

四.完善程序(前4空,每空2分,后5空,每空4分,共28分)

1.判断质数

题目描述:

给出一个正整数,判断这个数是否是质数。

输入:

一个正整数n(1 ≤ n ≤ 10000)。

输出:

如果n是质数,输出"YES";否则,输出"NO"。

输入样例:

10

输出样例:

NO

程序:

var

① : integer;

begin

read(n);

if n = 2 then writeln( ② )

else if ( ③ ) or (n mod 2 = 0) then writeln('NO')

else begin

i := 3;

while i * i <= n do begin

if  ④  then begin

writeln('NO'); exit;

end;

i := i + 2;

end;

writeln('YES');

end;

end.

2.木材加工

题目描述:

 

木材厂有一些原木,现在想把这些木头切割成一些长度相同的小段木头(木头有可能有剩余),需要得到的小段的数目是给定的。当然,我们希望得到的小段越长越好,你的任务是计算能够得到的小段木头的最大长度。木头长度的单位是cm。原木的长度都是正整数,我们要求得到的小段木头的长度也是正整数。

输入:

第一行是两个正整数N和K(1 ≤ N ≤ 100000,1 ≤ K ≤

10000),N是原木的数目,K是需要得到的小段的数目。

接下来的N行,每行有一个1到10000之间的正整数,表示一根原木的长度。

输出:

输出能够切割得到的小段的最大长度。如果连1cm长的小段都切不出来,输出"0"。

输入样例:

3 7

232

124

456

输出样例:

114

程序:

var

n,k :integer;

len : array[1..10000] of integer;

i,left,right,mid : integer;

function isok(t : integer) : boolean;

var

num,i : integer;

begin

num := 0;

for i := 1 to n do begin

if num >= k then break;

num :=  ① ;

end;

if  ②   then isok := true

else isok :=false;

end;

begin

readln(n,k);

right := 0;

for i := 1 to n do begin

readln(len[i]);

if right < len[i] then right := len[i];

end;

inc(right);  ③ ;

while  ④  < right do  begin

mid := (left + right) div 2;

if  ⑤  then right := mid

else left := mid;

end;

writeln(left);

end.

 

 

第十一届全国青少年信息学奥林匹克联赛初赛试题普及组(P)参考答案

 

一. 选择一个正确答案代码(A/B/C/D/E),填入每题的括号内 (每题1.5分,多选无分, 共30 分)

题号 1 2 3 4 5 6 7 8 9 10

选择 B A D E D D B D E A

题号 11 12 13 14 15 16 17 18 19 20

选择 D C E E A C D B C E

二.问题解答 (每题5分,共10分)

1. 答: 5 2. 答: 11

三. 阅读程序,并写出程序的正确运行结果:(每题8分,共32分)

(1) 程序的运行结果是: 499

(2) 程序的运行结果是: Today-ix-terrible!

(3) 程序的运行结果是: -7452

(4) 程序的运行结果是: zzzaaabbbcccy

四.根据题意, 将程序补充完整 (前4空,每空2分,后5空,每空4分,共28分)

pascal 语言 =================

1. ① n, i (或者 i, n) ② 'YES' ③ n = 1 (或者 n – 1 = 0)     ④ n mod i = 0

2. ① num + len[i] div t   ②   num >= k       ③   left := 0

④ left + 1     ⑤ not isok(mid) (或者 isok(mid) = false)


  评论这张
 
阅读(90)| 评论(0)
推荐 转载

历史上的今天

评论

<#--最新日志,群博日志--> <#--推荐日志--> <#--引用记录--> <#--博主推荐--> <#--随机阅读--> <#--首页推荐--> <#--历史上的今天--> <#--被推荐日志--> <#--上一篇,下一篇--> <#-- 热度 --> <#-- 网易新闻广告 --> <#--右边模块结构--> <#--评论模块结构--> <#--引用模块结构--> <#--博主发起的投票-->
 
 
 
 
 
 
 
 
 
 
 
 
 
 

页脚

网易公司版权所有 ©1997-2017