第一范文网 - 专业文章范例文档资料分享平台

NOIP1998普及组初赛试题及答案

来源:用户分享 时间:2025/5/17 20:22:12 本文由loading 分享 下载这篇文档手机版
说明:文章内容仅供预览,部分内容可能不全,需要完整文档或者需要复制内容,请下载word后使用。下载word有问题请添加微信号:xxxxxxx或QQ:xxxxxx 处理(尽可能给您提供完整文档),感谢您的支持与谅解。

第四届全国青少年信息学(计算机)奥林匹克分区联赛初赛试题

(初中组)

(PASCAL 语言 竞赛用时:2小时)

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

一、选择填空(25%)

1、操作系统是重要的系统软件,下面几个软件中不属于操作系统的是_______。 {1%} (A)MS-DOS (B)UCDOS (C)PASCAL (D)WINDOWS 95

2、MS-DOS 系统对磁盘信息进行管理和使用是__________为单位的。 {1%} (A) 文件 (B) 盘片 (C) 字节 (D) 命令

3、在计算机内部用来传送、存贮、加工处理的数据或指令(命令)都是以___形式进行的.{1%}

(A)十进制码 (B)智能拼音码 (C)二进制码 (D)五笔字型码

4.已知在计算机C:\\DOS下有一个正确的FORMAT.COM文件,当执行如下命令: C:\\> FORMAT A: < 回车 > 得到的回答是 BAD COMMAND OR FILE NAME 提示信息,下面解释正确的是_____________。 {2%} (A) 根目录中没有AUTOEXEC.BAT 文件 (B) 在执行该命令前操作者没执行过PATH 命令 (C) C:\\DOS 中的FORMAT.COM文件有错

(D) 由于AUTOEXEC.BAT 或操作者最后执行过的PATH 命令缺少路径

C:\\DOS,或者根本没有执行PATH 命令

5.将A盘上50个文件用C:\\>COPY A: *.* 命令复制到C盘的当前目录中,在复制到某一个文件时,由于读数据出错,屏幕显示: {2%} ABORT, RETRG , IGNORE , FAIL ?

键入“I”后,继续复制没再出现过错误信息,最后复制的结果是_________。 (A)读数据出错的文件不正确,其他文件正确 (B)读数据出错的文件不正确,其它文件也不正确 (C)读数据出错的文件正确,其它文件不正确 (D)复制的文件完全正确

6.下面四个不同进制的数,最小的一个数是 。 {2%} (A)(11011001)2 (B)(75)10 (C)(37)8 (D)(A7)16

7.小张用十六进制、八进制和十进制写了如下一个等式: {3%}

1

52 - 19 = 33

式中三个数是各不相同进位制的数,试问52、19、33,分别为_________. (A)八进制,十进制,十六进制 (B)十进制,十六进制,八进制 (C)八进制,十六进制,十进制 (D)十进制,八进制,十六进制

8.如果用一个字节来表示整数,最高位用作符号位,其它位表示数值。例如:{4%}

0 1 0 0 0 0 0 0 0 0 0 0 0 0 1 1 表示+1 表示-1

↑ 符号位表示正 ↑ 符号位表示负

① 试问这样表示法的整数A 的范围应该是_____________________。 (A) -127 ≤ A ≤ 127 (B) -128 ≤ A ≤ 128 (C) –128 ≤ A < 128 (D) -128 < A ≤ 128 ② 在这样表示法中,以下 说法是正确的。 (A)范围内的每一个数都只有唯一的格式 (B)范围内的每一个数都有两种格式 (C)范围内的一半数有两种格式 (D)范围内只有一个数有两种表示格式

9.下列IF语句中,ENDIF 表示相应IF的结束: {4%} y=0 if x<0 then Y=5 else if x<10 then y=10 if x<100 then y=100 endif else y=200 endif endif 试指出:

当X=80 时,运行的结果是______; 当X=5 时,运行结果为_________。

(A) Y=9 (B) Y=5 (C) Y=10 (D) Y=100 (E)Y=200

10.设栈S的初始状态为空,现有5个元素组成的序列{1,2,3,4,5},对该序列在

S栈上依次进行如下操作(从序列中的1开始,出栈后不再进栈):进栈、进栈、进栈,出栈、进栈、出栈、进栈。试问出栈的元素序列是______________。{4%} (A){ 5,4,3,2,1} (B){2,1} (C){ 2,3} (D){3,4}

2

二、问题求解:(20%)

1.已知一个数列U1,U2,U3,?,UN,? 往往可以找到一个最小的K值和K个数a1,a2, ?,ak使得数列从某项开始都满足:

UN+K=a1UN+K-1+a2UN+K-2+??+akUN (A) 例如对斐波拉契数列1,1,2,3,5,?可以发现:当K=2,a1 =1,a2 =1时,从第

3项起(即N>=1)都满足U n+2 =Un+1+Un 。试对数列12,22,32,?,n2,?求K和a1,a2, ?,aK使得(A)式成立。 {7%}

2.某班有50名学生,每位学生发一张调查卡,上写a,b,c三本书的书名,将读过的书打?,结果统计数字如下: 只读a者8人;只读b者4人;只读c者3人;全部读过的有2人;读过a,b两本书的有4人;读过a,c两本书的有2人;读过b,c两本书的有3人;{6%}

(1)读过a的人数是 (2)一本书也没有读过的人数是

3.任给自然数n,k, 1≤K≤9 ,按如下计算步骤求序列XJXJ-1??X0的步骤:{8%}

(1) j=0

(2) 如果N>=K 则转第3步,否则转第7步

(3) Xj = N MOD K {div表示整数除法,结果取整数; (4) N =N DIV K mod表示整除取余数} (5) j=j+1 (6) 回第2步

(7) Xj = N (8) 结束

试求当: N=1998, K=3时,XJXJ-1??X0 之值。

三、阅读程序,写出程序的正确运行结果(39%)

1. Program exp1 (imput,output); (7%) Var i, s, max: integer;

a :array [1..10] of integer; begin

for i:=1 to 10 do read (a[i]); max:=a[1] ;s:=a[1]; for i:=2 to 10 do begin

if s<0 then s:=0; s:= s+a[i];

if s>max then max:=s end;

writeln(‘max=’, max) end.

输入:-2 13 -1 4 7 8 -1 -18 24 6

3

输出:max=

2. Program exp2 (input,output); {10%}

Const n=5; Var i,j,k : integer;

a : array[1..2*n, 1..2*n] of integer; Begin K:=1;

For I:=1 to 2*n-1 do If i<=n then if odd(i) then

for j:= I downto 1 do begin

a [I-j+1,j]:=k; k:=k+1 end else for j: =1 to i do begin

a[i-j+1,j]:=k; k:=k+1; end

else if odd(i) then for j:=n downto I-n+1 do begin

a[I-j+1,j]:=k; k:=k+1; end else for j:=I-n+1 to n do begin

a[I-j+1,j]:=k; k:=k+1; end; for I:=1 to n do

begin for j:=1 to n do write(a[I,j]:3); writeln end; end.

3. Program exp3 (input,output); Const N=10; Var

S,I : integer;

Function CO(I1:integer) : integer;

VAR J1,S1 : integer;

4

{10%}

搜索更多关于: NOIP1998普及组初赛试题及答案 的文档
NOIP1998普及组初赛试题及答案.doc 将本文的Word文档下载到电脑,方便复制、编辑、收藏和打印
本文链接:https://www.diyifanwen.net/c6wro211fyp2nsft0jg2a_1.html(转载请注明文章来源)
热门推荐
Copyright © 2012-2023 第一范文网 版权所有 免责声明 | 联系我们
声明 :本网站尊重并保护知识产权,根据《信息网络传播权保护条例》,如果我们转载的作品侵犯了您的权利,请在一个月内通知我们,我们会及时删除。
客服QQ:xxxxxx 邮箱:xxxxxx@qq.com
渝ICP备2023013149号
Top