1、第二十届全国青少年信息学奥林匹克联赛初赛普及组 pascal 语言试题1、以下哪个是面向对象的高级语言（）.汇编语言.+ .Fortran D.Basic2、 1代表的字节数量是（）.2 的 10 次方 .2 的 20 次方 . .2 的 30 次方 . .2 的 40 次方3、二进制数 00100100 和 00010101 的和是（）.00101000 .001010100 .01000101 .001110014、以下哪一种设备属于输出设备.扫描仪 B.键盘 .鼠标 打印机5、下列对操作系统功能的描述最为完整的是（）.负责外设与主机之间的信息交换B.负责诊断机器的故障C控制和管理计算机系
2、统的各种硬件和软件资源的使用D.将源程序编译成目标程序6、 CPU、存储器、/O 设备是通过（）连接起来的A.接口 . 总线 .控制线 .系统文件7、断电后会丢失数据的存储器是（）. . C.硬盘 .光盘8、以下哪一种是属于电子邮件收发的协议（）. . C.2 .9、下列选项中不属于图像格式的是（）.JPEG 格式 .TXT 格式 .格式 .格式10.链表不具有的特点是（）.不必事先估计存储空间 B.可随机访问任一元素 C.插入删除不需要移动元素 D.所需空间与线性表长度成正比11.下列各无符号十进制整数中，所用八位二进制表示的数中最大的是（）A.296 B.133 c.256 d.19912
3、.下列几个 32 位 IP 地址中，书写错误的是（）A.162.105.142.27 B.192.168.0.1 C.255.256.129.1 D.10.0.0.113.要求以下程序的功能是计算：s=1+1/2+1/3+.+1/10。VarN:integer;S:real;BeginS:=1.0;For n:=10 downto 2 doS:=s+1 div n;Writeln(s:6:4);End.A.s:=1.0; B.for n:=10 downto 2 do C. S:=s+1 div n ; D.writeln(s:6:4);14.设变量 x 为 real 型且已赋值，则以下句子中
4、能将 x 中的数值保留到小数点后两位，并将第三位四舍五入的是（） 。A.x:=(x*100)+0.5/100.0B.X:=(x*100+0.5)/100.0C.x:=trunc(x*100+0.5)/100.0D.X:=(x/100+0.5)*100.015.有以下程序：VarS,a,n:integer;BeginS:=0;A:=1;Readln(n);RepeatS:=s+1;A:=a-2;Until a=n;Writeln(s);end.若要使程序的输出值为 2，则应该从键盘给 n 输入的值是（）A.-1 B.-3 c.-5 D.016.一棵具有 5 层的满二叉树中结点数为（）A.31 B
5、.32 C.33 D.1617.有向图中每个顶点的度等于该顶点的（）A.入度 B.出度 C.入席与出度之和 D.入度与出度之差18.设有 100 个数据元素，采用折半搜索时，最大比较次数为（）A.6 B.7 C.8 D.1019.若有如下程序段，其中 s、a、b、c 均已定义为整型变量，且 a、c 均已赋值，c0。S:=a;For b:=1 to c doS:=s+1;则与上述程序段功能等价的赋值语句是()A .s:=a+b B.s:=a+c C.s:=s+c D s:=b+c20.计算机界的最高奖是（）A.菲尔兹奖 B.诺贝尔奖 C.图灵奖 D. 普利策奖2、 问题求解1、 把 M 个同样的
6、球放到 N 个同样的袋子里，允许有的袋子空着不放，问共有多少种不同的放置方法？（用 K 表示） 。例如：M7， N3 时，K 8 ；在这里认为（5，1，1 ）和（1，5 ，1）是同一种放置方法。问：M 8，N 5 时，K 。2、 如图所示，图中每条边上的数字表示该边的长度，则从 A 到 E 的最短距离是（ ）3、 程序阅读1、 VarA,b,c,d,ans:integer;BeginReadln(a,b,c);D:=a-b;A:=d+c;Ans:=a*b;Writeln(ans=,ans);end.2、 VarN:integer;Function fun(n:integer):integer;
7、BeginIf n=1 thenExit(1);If n=2 thenExit(2);Exit(fun(n-2)-fun(n-1);End;BeginReadln(n);Writeln(fun(n);End.3、 VarSt:string;Len,i:integer;BeginReadln(st);Len:=length(st);For i:=1 to len do If(sti=a) and (sti9) thenBeginSj:=si;(2) ;End;Exit( 3 );End;BeginReadln(s);Len:=delnum(s);For i:=1 to len doWrite(
8、(4) );Writeln;End.2、 （最大子矩阵和）给出 m 行 n 列的整数矩阵，求最大的子矩阵和（子矩阵不能为空） 。输入第一行包含两个整数 m 和 n，即矩阵的行数和列数。之后 m 行，每行 n 个整数，描述整个矩阵。程序最终输出最大的子矩阵和。ConstSize=100;VarMatrix:array1size,1size of integer;Rowsun:array1size,0size of integer;M,n,i,j,first,last,area,ans:integer;BeginRead(m,n);For i:=1 to m doFor j:=1 to n doRead(matrixi,j);Ans:=matrix( 1 );For i:=1 to m do(2) ;For i:=1 to m doFor j:=1 to n doRowsuni,j:= (3) ;For first:=1 to n doFor last:=first to n doBegin(4) ;For i:=1 to m doBeginArea:=area+ (5) ;If (areaans) thenArea:=area;If(area0) thenArea:=0;End;End;Writeln(ans);end.
