2005年小学生决赛试题2(pascal)练习.docVIP

2005年东莞市小学生计算机程序设计竞赛 复赛试题（二）pascal语言 说明：请将答案填在答题卡上，只交答题卡， 选择题：（每题1分，共10分） 1、计算机内部，对数据进行加工处理都是以（ ）形式进行的。 A、十进制数 B、二进制数 C、十六进制数 D、八进制数 2、不同的计算机所用的指令也不同，这主要取决于（ ）。 A、所用的操作系统 B、系统的总体结构 C、所用的CPU D、所用的语言 3、下面不是程序设计语言的有（ ）。 A、PASCAL B、BASIC C、C++ D、DOS 4、下列五进制数中，不合法的数（ ）。 　　A、310（5）　　B、401（5）　　C、250（5）　　D、300（5） 5、计算机病毒破坏的是（ ）。 A、软盘 B、硬盘 C、打印机 D、程序和数据 6、下面几个不同进制的数中，最小的是（　　） A、102（5）　 B、65（10）　　C、78（8）　D、110110(2) 7、1字节在计算机中用　　　　位二进制来表示（　　） A、2位　　B、8位　　C、10位　　D、16位 8、1个汉字在计算机中占　　　　个字符的位置（　　） A、2个　　B、8个　　C、10个　　D、1个 9、断电后保存在下面哪个设备中的数据会丢失（　　） A、硬盘　　B、光盘　　C、ROM　　D、RAM 10、下列设备中，既是输入设备，又是输出设备的是（　　） A、显示器　　B、打印机　　C、磁盘　　D、扫描仪 二、填空题（每小题5分，共15分） 1、求144的约数有多少个？（所谓144的约数，就是指能整除144的数） 2、从1到99的自然数中，不含数字3的自然数有多少个？ 3、100个青年人中，会骑自行车的有83人，会游泳的有75人，两样都不会的有10人，两样都会的有多少人？ 三、运行结果：（每小题6分，共36分） 四、程序填空：（每空3分，共39分） 1、从键盘输入两个字符串A和B，下面程序能找出它们最长的公共子串，请完善程序。 分析：所谓公共子串，就是两个字符串中含有相同的子字符串。 program f2_401; var a,b,temp,d:string; la,lb,len,j,k:integer; begin write(input the string 1:); readln(a); write(input the string 2:); readln(b); if length(a)=length(b) then begin temp:=a; a:=b; b:=temp; end; la:=length(a); lb:=length(b); for len:=la downto 1 do for j:=1 to la+1-len do begin d:= (1) ; for k:=1 to lb+1-len do if (2) then begin writeln( (3) ); halt; end; end; writeln(no fint!); end. 面程序的功能是：读入N个数,用折半插入法进行从小到大排序。请完善程序。 分析：所谓的折半插入法是在确定插入位置时先将插入数据与已有序数据的中间数据比较，以确定插入位置是在中间位置前还是后，然后再与前或后半部数据的中间数据比较，直到这部分数据只有一个即找到应插入的位置，再将数据插入。 program f2_402; var n,m,j,k,g,h,temp:integer; a:array[1..100] of integer; begin write(n=); readln(n); for j:=1 to n do readln( (4) ); for j:=2 to n do begin temp:=a[j]; g:=1; h:=j-1; repeat m:=(g+h+1) div 2; if (5) then h:=m-1 else g:=m+1; until g=h; for k:=j-1 downto g do (6) ; (