初赛辅导模拟练习题一

1、一、选择一个正确代码（A/B/C/D），填入每题的括号内（每题 1.5 分，多选无分，共 30 分）1、MAN 英文缩写的含义是（ ）A.局域网B.城域网C.广域网D.增值网2、用十六进制，八进制和十进制写了如下一个等式：6413=33式中三个数是各不相同进位制的数，试问 64，13，33，分别为。A八进制，十进制，十六进制 C八进制，十六进制，十进制3、表达式(4 MOD (3)与(4B十进制，十六进制，八进制 D十进制，八进制，十六进制MOD 3)的值为：。A1，1B1，1C1，1D1，14、试begin y:=0;：下列 if 语句中，当 x=80 时, 运行的结果为。readln(x)

2、;if x0then y:=5 elseif x10then beginy:=10;if xrj) and (j0) dobegin rj+1:=rj;j:=j-1;end; rj+1:=k;end;for I:=1 to n dowrite(rI,);wrin end.键盘输入: 8 4 9 3 5屏幕输出：program exp2;var a,b,f: functionbeginif n=0 theneger;gd(m,n:eger):eger;gd:=melse gd:=gd(n,m mod n);end; beginreadln(a,b);write(,a,b,)=);f:=gd(a,

3、b);wriend.n(f)键盘输入: 172 16屏幕输出：3、Program exp3(input,output);VAR I,J,S:EGER;B :ARRAY0.5 OFEGER;BEGINS:=1;FOR I:=1 TO 5 DOBI:=I;J:=1;WHILE J0 DO BEGINJ:=5;WHILE (J0) AND IF J0 THENBEGIN(BJ=10+J-5) DO J:=J-1;S:=S+1;BJ:=BJ+1;FORi:=J+1TO5DOBi:=BJ+i-JEND;END;WRIN(S=,S);END.4、programvar m,n,g:exp4(input,ou

4、tput);eger;function beginif n=0 elseend;(m,n:eger):eger;then:=m:=(n,m mod n)beginread(m,n);g:= wriend.输入：48输出：(m,n);n(m=,m,n=,n,=,g)9三、问题解答（第 1 题每空 4 分，第 2 题 8 分）1、数据结构中，下面是一个树结构图，这个树的先序遍历结果是，中序遍历结果是：。248+3*4107-*/2、给出一个后缀算术表达式为写出对应的中缀算术表达式：四、完善程序（第一题每空 3 分，第二题每空 2 分，第三题每空 4 分，共 32 分台问题:已知一个含有多个整数的数

5、组，其中相同的元素集中在一起形成一个）1、连续整数平。以下程序用于对输入的数组求出其中最大长度。例如，中元素个数为 20，它们依次为22223333311111111144则它的最大长度为 9。const maxlength=100; vara:array1.maxlength ofeger;i,maxi,n,s,t:begineger;write(n=);readln(n);for i:=1 to nreadln; maxi:=0;do read(ai);t:=s:=1;1for i:=2 to nif ai=telsedothen2beginif smaxi then t:=ai;3end

6、;maxi:=s;4n(maxi=,maxi);wriend.2、1000！尾 0 问题以下程序用于统计 1000！末尾有多少个 0。其中 1000！=1231000。实际上只要统计 1000！有多少个因子 10。由于 10=52，因而只需统计有多少个因子 5和 2。显然在 11000 的所有数中，5 的因子个数比 2 的因子个数少。因此，只要统计 11000 的所有数有多少个因子 5 就行了。vari,j,n:eger; beginn:=0;for i:=1 to 200 do beginj:=i*5;while5begin=0 don:=n+1;j:= end;6end;n(n:4);wr

7、iend.3、问题描述找数问题: 以下程序用在 n 个不同元素中找出第k 个最小元素。程序中用分治策略来设计算法。把这 n 个元素放在一个数组中,然后取出第 k 个元素为标准 m,把 n 个元素重新排列:小于标准 m 的元素放在数组前面,大于该标准的放在数组的后面。把该元素 m 放在两者之间。设小于标准的元素个数为j-1,如果 j=k,则 A(k)即为所求元素。如果 jk,则第 k 个元在区间1,j,因此取 A1,Aj为新的元素集合,然后重复上述的”部分排序”的过程。如果 jk,则第 k 个元在区间j+1,n,因此取 Aj,An为新的元素集合,重复过程。直至 j=k 为止。程序var j,k,

8、n:eger;a:array1.100 ofeger;procedure search(b,e:eger);var I,m,t:begineger;if b=e then begin j:=b;exit end;I:=b;j:=e;m:= RepeatWhile aImWhile maj do If I=j;If I=k thenexit;then search(b,j) else search(j+1,e)IfEnd;9procedurevar I: begin10eger;for wri wriend;I:=1 ton;n do write(aI,);n(a,k,=,ak);beginwr

9、ite(n=);readln(n); write(a1.,n,=); for k:=1 to n do read(ak); readln;write(k=);readln(k);search( pr(n); readlnend.11;参考一、 单项选择题（每题 1 分，共 30 分）1 2 3D C B 11 12 D B C4 5 6B D D 13 14 B B B7 8 9C C C 15 16 C D D10C17 18 19 20B二、阅读下列程序，写出程序运行结果（第 1 题 5 分，第 2，3，4 题各 6 分，共 23 分）1、1、3、4、98543（172，16）=4S=252 m=48n=9=3三、问题解答（第 1 题每空 4 分，第 2 题 8 分）1、 ABCDE2、(24+8)*3/4*(10-7)BADCE四、完善程序