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

第八届全国青少年信息学奥林匹克联赛(NOIP2002)试题(普P)

第八届全国青少年信息学奥林匹克联赛(NOIP2002)试题
(普及组 PASCAL 语言二小时完成) 全部试题答案均要求写在答卷纸上,写在试卷纸上一律无效

一.选择一个正确答案代码(A/B/C/D,填入每题的括号内(每题 1.5 分,多选无分,共 30 分) 1)微型计算机的问世是由于( A) 中小规模集成电路 2)下列说法中正确的是( ) 的出现。 C) (超)大规模集成电路 D) 电子管电路

B) 晶体管电路 )。

A) 计算机体积越大,其功能就越强 B) CPU 的主频越高,其运行速度越快 C) 两个显示器屏幕大小相同,则它们的分辨率必定相同 D)点阵打印机的针数越多,则能打印的汉字字体越多 3)Windows98 中,通过查找命令查找文件时,若输入 F*.? , 则下列文件( A) F.BAS B) FABC.BAS C) F.C D) EF. )。 ) 可以被查到。

4)CPU 处理数据的基本单位是字,一个字的字长( A) 为 8 个二进制位 C) 为 32 个二进制位 B) 为 16 个二进制位 D) 与芯片的型号有关

5)资源管理器的目录前图标中增加"+"号,这个符号的意思是( A) 该目录下的子目录已经展开 C) 该目录下没有子目录

)。

B) 该目录下还有子目录未展开 D) 该目录为空目录, )。 D) FORTRAN

6)下列哪一种程序设计语言是解释执行的( A) Pascal B) GWBASIC C) C++ )。

7)启动 WORD 的不正确方法是(

A) 单击 Office 工具栏上的 Word 图标 B) 单击"开始"→"程序"→Word C) 单击"开始"→"运行",并输入 Word 按回车 D) 双击桌面上的"Word 快捷图标" 8)多媒体计算机是指( A) 专供家庭使用的 ) 计算机。 B) 装有 CDROM 的 D) 具有处理文字、图形、声音、影像等信息的 )。

C) 连接在网络上的高级

9)在树型目录结构中,不允许两个文件名相同主要是指( A) 同一个磁盘的不同目录下

B) 不同磁盘的同一个目录下 D) 同一个磁盘的同一个目录下 )。

C) 不同磁盘的不同目录下、

10)用画笔(Paintbrush)绘制图形并存储在文件中,该图形文件的文件名缺省的后缀为( A) .jpg B) .bmp C) .gif D).tiff )。

11)E-ml 地址中用户名和邮件所在服务器名之间的分隔符号是( E A) # B) @ C) & ) 16. D) $

12)(0.5)10=(

A) 0.1

B) 0.75

C) 0.8

D) 0.25

13)IP v4 地址是由( A) 16 B) 32

) 位二进制数码表示的。 D) 8 )。

c) 24

14)算式(2047)10 一(3FF)16+(2000)8 的结果是( A) (2048)10 B) (2049)10 ) C) (3746)8

D) (1AF7)16

15)下列叙述中,错误的是(

A) Excel 中编辑的表格可以在 Word 中使用 B) 用 Word 编辑的文本可以存成纯文本文件 C) 用记事本(Notepa D) 编辑文本时可以插入图片

D) 用画笔(Paintbrush)绘图时可以输入文字 16)一个向量第一个元素的存储地址是 100,每个元素的长度是 2,则第 5 个元素的地址是( A) 110 B) 108 C) 100 D) 109 )。 )

17)在所有排序方法中,关键字比较的次数与记录的初始排列次序无关的是( A) 希尔排序 B) 起泡排序 C) 插入排序 ) D) 选择排序

18)在计算机网络中,Modem 的功能是( A) 将模拟信号转换为数字信号

B) 将数字信号转换为模拟信号 D) 实现将模拟信号的数字信号

C) 实现模拟信号与数字信号的相互转换

19)设有一个含有 13 个元素的 Hash 表(O~12),Hash 函数是:H(key)=key % 13,其中%是求余 数运算。用线性探查法解决冲突,则对于序列(2、8、31、20、19、18、53、27),18 应放在第几号 格中( A) 5 )。 B) 9 C) 4 D) 0 )。

20)要使 1…8 号格子的访问顺序为:82、63、73、1、4,则下图中的空格中应填人( 12345678 4 6 1 -1 7 3 2 A) 6 B) O C) 5 D) 3

二.问题求解: 1. 如下图,有一个无穷大的的栈 S,在栈的右边排列着 1,2,3,4,5 共五个车厢。 其中每个车厢可以向左 行走,也可以进入栈 S 让后面的车厢通过。现已知第一个到达出口的是 3 号车厢,请写出所有可能的 到达出口的车厢排列总数(不必给出每种排列)。 出口← ← 1 S↓ 2.将 N 个红球和 M 个黄球排成一行。例如:N=2,M=3 可得到以下 6 种排法: 红红黄黄黄 红黄红黄黄 红黄黄红黄 黄红红黄黄 黄红黄红黄 黄黄黄红红 问题:当 N=4,M=3 时有多少种不同排法?(不用列出每种排法) 三.阅读程序: program exp1; var i,j,k,n,,L0,L1,LK:Integer; a :array [0..20] of integer; 2 3 4 5

begin readln(n,k); for i:=0 to n-1 do a[i]:=i+1; a[n]:=a[n-1];L0:=n-1; Lk:=n-1; for I:=1 to n-1 do begin L1:=L0-k; if (l1<0) then L1:=L1+n; If (l1=Lk) then begin A[L0]:=a[n]; Lk:=Lk-1; a[n]:=a[Lk]; l0:=lk End; Else Begin A[l0]:=a[l1];l0:=l1; End; End; A[L0]:=a[n]; For I:=0 to n-1 do write(a[I]:40; Writeln; End. 输入:10 输出: 2)program exp2; var n,jr,jw,jb:integer; ch1:char; ch:array[1..20]d char; begin readln(n); for i:=1 to n do read(ch[i]): jr:=1;jwz=n;jb:=n;: while (jr<=jw)do begin if(ch[jw]='R') then begin ch1:=Ch[jr];Ch[jr]:=ch[jw];ch[jw]:=ch1:jr:=jr+13 end else if ch[jw]='W' then jw:=jw-1 else begin 4

ch1:=ch[jw];ch[jw]:=ch[jb];ch[jb]:=ch1;jw:=jw-1;jb:=jb-1; end end; for i:=1 to n do write(ch[i]); writeln; end. 输入:10 RBRBWWRBBR 输出: 3)Pmgram exp3; Var I,j,p,n,q,s:integer; a :array[1..20]of integer; begin readln(p,n,q);j :=21; while (n>0)do begin j:=j-1;a[j]:=n mod 10;n:=n div 10; end; s:=0; for i:=j t0 20 do s:=s*p+a[i]; writeln(s);j :=21; while (s>O)do begin j:=j-1;a[j]:=s mod q;s:=s div q;end; for i:=j to 20 do write(a[i]);readln; end. 输入:7 3051 8 输出: 四.完善程序: 1.问题描述:将 n 个整数分成 k 组(k≤n,要求每组不能为空),显然这 k 个部分均可得到一个各自的和 s1,s2,……sk,定义整数 P 为: P=(S1-S2)2+(S1 一 S3)2+……+(S1-Sk)2+(s2-s3)2+……+(Sk-1-Sk)2 问题求解:求出一种分法,使 P 为最小(若有多种方案仅记一种〉 程序说明: 数组:a[1],a[2],...A[N]存放原数 s[1],s[2],...,s[K]存放每个部分的和 b[1],b[2],...,b[N]穷举用临时空间 d[1],d[2],...,d[N]存放最佳方案 程序:

program exp4; Var i,j,n,k : integer; a :array [1..100] of integer; b,d:array [0..100] of integer; s :array[1..30] of integer; begin readln(n,k); for I:=1 to n do read(a[I]); for I:=0 to n do b[I]:=1; cmin:=1000000; while (b[0]=1) do begin for I:=1 to k do for I:=1 to n do ② sum:=0; for I:=1 to k-1 do for j:= ③ ①

sum:=sum+(s[I]-s[j])*(s[I]-s[j]); if ④ then

begin cmin:=sum; for I:=1 to n do d[I]:=b[I]; end; j:=n; while ⑤ do j:=j-1;

b[j]:=b[j]+1; for I:=j+1 to n do end; writeln(cmin); for I:=1 to n do write(d[I]:40); writeln; end. 2. 问题描述:工厂在每天的生产中,需要一定数量的零件,同时也可以知道每天生产一个零件的生产单 价。在 N 天的生产中,当天生产的零件可以满足当天的需要,若当天用不完,可以放到下一天去使用,但 要收取每个零件的保管费,不同的天收取的费用也不相同。 问题求解:求得一个 N 天的生产计划(即 N 天中每天应生产零件个数),使总的费用最少。 输入:N(天数 N<=29) ⑥

每天的需求量(N 个整数) 每天生产零件的单价(N 个整数) 每天保管零件的单价(N 个整数) 输出:每天的生产零件个数(N 个整数) 例如:当 N=3 时,其需要量与费用如下: 第一天 第二天 第三天 需要量 25 15 30 生产单价 20 30 32 保管单价 5 l0 0 生产计划的安排可以有许多方案,如下面的三种: 第一天 第二天 第三天 总的费用 25 15 30 25*2O+15*30+30*32=1910 40 0 30 40*20+15*5+30*32=1835 70 0 0 70*20+45*5+30*10=1925 程序说明: b[n]:存放每天的需求量 c[n]:每天生产零件的单价 d[n]:每天保管零件的单价 e[n]:生产计划 程序: Program exp5; Var i,j,n,yu,j0,j1,s:integer; b,c,d,e: array[0..30]of integer; begin readln(n); for i:=1 to n do readln(b[[i],c[I],d[i]]; fori:=1 to n do e[i]:=0; ① :=10000;c[n+2]:=0;b[n+1]:=0;jO:=1;

while (jO<=n)do begin yu:=c[j0]; j1:=jO; s:=b[j0]; while begin ③ end; ④ end; jO:=j1+1; j1:=j1+1;s:=s+b[j1]; ② do

for i:=1 to n do readln; end.




相关文章:
第八届全国青少年信息学奥林匹克联赛(NOIP2002)试题.doc
第八届全国青少年信息学奥林匹克联赛(NOIP2002)试题 (普及组 PASCA
第八届全国青少年信息学奥林匹克联赛普及组.doc
第八届全国青少年信息学奥林匹克联赛普及组 - 第八届全国青少年信息学奥林匹克联赛(NOIP2002)试题 (普及组 PASCAL 语言二小时完成) 全部试题答案均要求写在答卷纸...
noip 2002 p 附答案.pdf
noip 2002 p 附答案 - 第八届全国青少年信息学奥林匹克联赛(NOIP2002)初赛试题 (提高组 PASCAL 语言 二小时完成) 审定:全国青少年信息学奥林匹克竞赛科学委员会 ...
第八届全国青少年信息学奥林匹克联赛试题及答案.doc
第八届全国青少年信息学奥林匹克联赛(NOIP2002)初赛试题 (提高组 PAS
noip2002初赛试题及答案.doc
noip2002初赛试题及答案 - 第八届全国青少年信息学奥林匹克联赛(NOIP2002)试题 (普及组 PASCAL 语言二小时完成) 全部试题答案均要求写在答卷纸上,写在试卷纸上...
第八届全国青少年信息学奥林匹克联赛初赛试题(PASCAL).pdf
第八届全国青少年信息学奥林匹克联赛初赛试题(PASCAL)_学科竞赛_初中教育_教育专区。第八届全国青少年信息学奥林匹克联赛(NOIP2002)初赛试题 (提高组 PASCAL 语言二...
第八届青少年信息学奥林匹克联赛初赛试题.doc
第八届青少年信息学奥林匹克联赛初赛试题 - 第八届全国青少年信息学奥林匹克联赛(NOIP2002)试题 (普及组 PASCAL 语言二小时完成) 全部试题答案均要求写在答卷纸上,...
2002年初赛试题及答案(普及组).doc
2002年初赛试题及答案(普及组) - 第八届全国青少年信息学奥林匹克联赛(NOIP2002)试题 (普及组 PASCAL 语言二小时完成) 全部试题答案均要求写在答卷纸上,写在试卷...
NOIP2002普及组初赛试题及答案.doc
第八届全国青少年信息学奥林匹克联赛(NOIP2002)试题 (普及组 PASCA
NOIP2002提高组初赛试题答案.doc
第八届全国青少年信息学奥林匹克联赛( 第八届全国青少年信息学奥林匹克联赛(NOIP2002)初赛 ) 试题(提高组参考答案) 提高组参考答案)一、 选择一个正确答案代码(A...
2002年信息学奥林匹克竞赛(普及组).doc
第八届全国青少年信息学奥林匹克联赛(NOIP2002)试题 (普及组 PASCA
NOIP2002 普及组初赛试题.doc
第八届全国青少年信息学奥林匹克联赛(NOIP2002)试题 (普及组 PASCA
第八届全国青少年信息学奥林匹克联赛(NOIP2002)初赛试题.doc
第八届全国青少年信息学奥林匹克联赛(NOIP2002)初赛试题_初三数学_数学_
第十一届全国青少年信息学奥林匹克联赛初赛试题及答案.pdf
NOIP2005 普及 pascal 第十一届全国青少年信息学奥林匹克联赛初赛试题 ( 普及组 pascal 语言●● 二小时完成 ) 全部试题答案均要求写在答卷纸上,写在试卷纸上一律...
第十七届2011全国青少年信息学奥林匹克联赛初赛试题(普....doc
第十七2011全国青少年信息学奥林匹克联赛初赛试题(普及组C++)_学科竞赛_高中...NOIP2011 初赛 普及组 C++ 3 int main() { string map= "2223334445556667778889999...
全国青少年信息学奥林匹克联赛初赛练习卷(八)new答案.doc
全国青少年信息学奥林匹克联赛初赛练习卷(八)new答案...(普及组 PASCAL 语言 二小时完成) ●● 全部试题...P G Begin For I := 0 to 100 do G[I]:=...
第22届全国青少年信息学奥林匹克联赛NOIP2016提高组试....doc
第22届全国青少年信息学奥林匹克联赛NOIP2016提高组试题day1_学科竞赛_高中教育_教育专区。NOIP2016复赛提高组day1 word版 第22 届全国青少年信息学奥林匹克联赛 CCF...
第二十三届全国青少年信息学奥林匹克联赛普及组初赛试....pdf
第二十三届全国青少年信息学奥林匹克联赛初赛(NOIP2017)(普及组 C++语言试题) ...p 2 p/2 提示:若 p 为偶数,x =(x ) #include <iostream> using name...
全国青少年信息学奥林匹克联赛初赛练习卷(二)答案.doc
全国青少年信息学奥林匹克联赛初赛练习卷(二)答案_...var a, b, c, p, q: integer; r: array[0...第十四届全国青少年信息... 2页 免费 NOIP2014 ...
第十六届青少年信息学奥林匹克联赛初赛试题(附答案).pdf
第十六届全国青少年信息学奥林匹克联赛初赛试题 (普及...p[j] ③ p[r]
更多相关标签: