信息学初赛模拟试题(七、八)及答案

信息学初赛模拟试题（七）一、选择一个正确答案代码（A/B/C/D），填入每题的括号内（本题共20小题，每题1.5分共30分。

1—10小题为单选题，11—20小题为不定项选择题，每题有一个或多个答案。

）1、如果按字长来划分，微型机可以分为8位机、16位机、32位机和64位机。

所谓32位机是指该计算机所用的CPU（）A、同时能处理32位二进制数B、具有32位的寄存器C、只能处理32位二进制定点数D、有32个寄存器E、存储方式是32位2、下列表达式正确的是（）A、（1）10>（1）2B、（12）10>（10）16C、（15）8>（10）16D、（101）2>（15）16E、（121）10=（79）163、关闭一个活动应用程序窗口，可按快捷键（）A、Ctrl+F4B、Alt+F4C、Alt+EscD、Ctrl+EscE、Shift+Esc4、结构化程序设计的三种结构是（）A、顺序结构、选择结构、转移结构B、分支结构、等价结构、循环结构C、多分结构、赋值结构、等价结构D、分支结构、顺序结构、选择结构E、循环结构、顺序结构、选择结构5、编译程序是指（）A、将高级语言源程序翻译成机器语言程序（目标程序）B、将机器语言源程序翻译成高级语言程序（目标程序）C、对源程序边扫描边翻译执行D、对目标程序装配连接E、运行源程序并修改错误6、在pascal语言中下列运算符（）的优先级别最高A、ANDB、NOTC、<>D、*E、OR7、在线性表中，那些结点只有一个直接前驱和一个直接后续（）A、头结点B、尾结点C、中间的结点D、所有结点E、不确定8、具有12个记录的序列，采用冒泡排序法最少的比较次数是（）A、1B、144C、11D、66E、09、有N个结点的图的邻接矩阵存储法中，链表的表头结点有（）个。

A、NB、2NC、N/2D、N*NE、N-210、表达式SQRT（ABS（-100）*SQR（ROUND（3.7）））的值是（）。

A、30B、40C、30.0D、40.0E、40.0011、二叉树的后序遍历为abcdef，这棵二叉树可能是：12、具有4个顶点的无向完全图有（）条边。

A、6B、12C、16D、2013、二进制数1101101.11011转换成十六进制数为（）A 、6D.D8B 、6D.D1C 、CD.D8D 、CD.D1E 、CD.D314、有如下公式，则f (f (2*f(3)-1)*2)为()2(n ≤2)f (n)=f(n-1)+f(n-2)-1(n ≥3)A 、14B 、2C 、145D 、146E 、14715、现有一栈：a,b,c,d,e,f 则有可能是出栈的序列是()A 、a,bB 、a,c ,e,bC 、b,c,eD 、f,e,d,c,a,bE 、a,b,c,d,e,f 16、下列软件属于系统软件的是（）A 、WORDB 、WINDOWS 98C 、DOSD 、UNIXE 、FLASH 17、800个24×24点阵汉字字型库所需要的存储容量是（）A 、7.04KB B 、56.25KB C 、7200B D 、450KB E 、720MB 18、对于矩阵⎥⎥⎥⎦⎤⎢⎢⎢⎣⎡=mn m1111a ...a ............n a a A D ij 为a ij 的地址，每个元素占三个字节空间。

若按照行顺序存储，则计算D ij 正确的式子是（）。

A.D 11+3(n(i-1)+(j-1))B.D kp +3(n(i-k)+(j-p))C.D 11+m(i-1)+(j-1)D.D 11+n(j-1)+(i-1)E.D 11+m(j-1)+(i-1)19、设有说明type byte=0..7;word=0..15;num=real;var a:byte;b,c:word;d:integer;e:num;f:char;则下列合法的赋值语句是（）A 、b:=a;B 、d:=c;C 、f:=b;D 、a:=f;E 、e:=d;20、有如下函数说明：function st(a,b,c:integer):integer begina:=2*b-2st:=a+4div b mod c;end则下列结果正确定是（）A 、st (2,st(1,2,3),4)=6B 、st (2,st(1,2,3),4)=7C 、st (st(1,2,3),2,4)=6D 、st (st(1,2,3),2,4)=4E 、st (2,4st(1,2,3))=7二、问题解答：（本题共2小题，每题5分，共10分）1、有一群儿童，他们的年龄之和50岁，其中最大的13岁，有一个是10岁；除去这个10岁儿童之外，其余儿童的年龄都是整数且恰好组成一个等差数列．请按由小到大的顺序写出这几个儿童的岁数：____________________________2、有n 个不同的整数，从中取出两组来，要求第一组数里的最小数大于第二组的最大数。

问有多少种方案？________________三、阅读程序，并写出程序正确的运行结果：(本题共4小题，每题8分，共32分)1、program expl(input,output);var i,s,max:integer;a:array[1…10]of integer;beginfor i:=1to10do read(a[i]);max:=a[1];s:=a[1];for i:=2to10dobeginif s<0then s:=0;s:=s+a[i];if s>max then max:=s;end;writeln(‘max=’,max)end输入：4415-554-82896-92、progam exp2(input,output)；var p,q,s,t:integer；beginreadln(p);for q:=p+1to2*p dobegint:=0；s:=(p*q)mod(q-p)；if s=0thenbegint:=p+q+(p*q)div(q-p)；write(t:4)；end；end；readlnend.输入：124、Program EXP4(input,output);const n=4;type se=array[1..n*2]of char;var i,j,i1,j1,k,s,t,s1,L,swap:integer;temp:char;a:se;Beginfor i:=1to n*2do read(a[i]);readln;s:=0;t:=0;for i:=1to n*2doif a[i]='1'then s:=s+1else if a[i]='0'then t:=t+1;if(s<>n)or(t<>n)then writeln('error')elsebegin s1:=0;for i:=1to2*n-1do if a[i]<>a[i+1]then s1:=s1+1;writeln('jamp=',s1);swap:=0;for i:=1to2*n-1dofor j:=i+1to2*n doif a[i]<>a[j]thenbegintemp:=a[i];a[i]:=a[j];a[j]:=temp;s:=0;for L:=1to2*n-1doif a[L]<>a[L+1]then s:=s+1;if s>swap thenbegin swap:=s;i1:=i;j1:=j end;temp:=a[i];a[i]:=a[j];a[j]:=tempend;if swap>0then writeln('maxswap=',swap-s1,'i=',i1,'j=',j1)endEnd.输入：001001113、program ex3(output);typearr=array[1..4,1..4]of integer; vara:arr;x,y:integer;beginfor x:=1to4dofor y:=1to4doif(x+y=5)or(x-y=3)thena[x,y]:=1elsea[x,y]:=0;for x:=1to4dobeginfor y:=1to4dowrite(a[x,y]:3);writelnend;end.四、完善程序：(本题共7空，每空4分，28分)1、孪生素数是指两个相差为2的素数，例如：3和5，5和7，11和13等。

下面的程序可输入出15对孪生素数，其中函数f判断整数a是否素数。

Program p(output);vark,n:intergerfunction f(a:interger):boolean;vark:integer;flag:boolean;beginflag:=____________;k:=2;while(k<=a div2)and______________doif a mod k=0then______________elsek:=k+1;f:=flagendbeginn:=0;k:=2;repeatif f(k)and___________thenbeginn:=n+1;writeln(k,k+2)endk:=k+1until n=15end2、已知有类型说明:type t1=^rec;rec=recorddata:integer;next:t1end;设head为t1型变量，并指向一个不少于2个节点的单链表。

过程p1可删除phead所指的链表所有重复节点（即若有多个节点的data域的值相等，则只保留最前面的一个节点）。

例如：若原链表为则执行pl(head);后链表为：请完成过程plprocedure pl(head:t1);var q,p,t1;beginwhile head<>nil dobeginp:=head;q:=p^.next;while q<>nil doif q^.data=head^.data thenbegin_________:=q.next;dispose(______);q:=p^.nextendelsebeginp:=p^.next;q:=__________end;head:=head^.nextend;end;参考答案一、选择题题号12345678910答案A E B E A B C C A D题号11121314151617181920答案AB A A A ACE BCD B AB ABE BDE二、问题求解1、7，9，10，11，132、n·2n-1+1三、看程序写结果1、max=592、1811108776666261603、00010010010010004、jamp=3maxswap=3i=1j=7四、完善程序1、trueflag或flag=trueflag:=false2、p^.nextqp^.next;信息学初赛模拟试题（八）（中学组PASCAL语言，两小时完成）◆◆请将正确答案在答卷上填写，在本试题卷上答题无效◆◆一、选择题（每小题1.5分，共30分）1、一台计算机一经设计出厂，其指令系统_____A、已确定B、再经软件人员编制而成C、可继续其功能D、属系统软件2、把整数7转换为字符’7’的表达式是_____A、Chr（7）-ord（‘0’）B、chr（7-ord（0））B、Chr（7+ord（‘0’））D、chr（7+ord（0））3、_____接口是一种通用型系统级接口，它连接的外设可以是硬盘驱动器、光盘驱动器和扫描仪等。