1999年9月二级笔试试题pascal.txt

c++的大量习题,对二级考试大有帮助. 希望大家满意.

1999年9月二级笔试试题PASCAL 

一.选择题(1-40题每题1分,41-50题每题2分,共60分) 
下列各题A).B).C).D)四个选项中,只有一个选项是正确的,请将正确选项涂写在答题卡 
相应位置上,答在试卷上不得分. 
(1)十进制数1385转换成十六进制数为 
A)568 B)569 C)D85 D)D55 
(2)下列叙述中正确的是 
A)计算机病毒只能传染给可执行文件 
B)计算机软件是指存储在软盘中的程序 
C)计算机每次启动的过程之所以相同,是因为RAM 中的所有信息在关机后不会丢失 
D)硬盘虽然装在主机箱内,但它属于外存 
(3)一个字长的二进制数是 
A)8 B)16 C)32 D)随计算机系统而不同的 
(4)CPU主要由运算器与控制器组成,下列说法中正确的是 
A)运算器主要负责分析指令,并根据指令要求作相应的运算 
B)运算器主要完成对数据的运算,包括算术运算和逻辑运算 
C)控制器主要负责分析指令,并根据指令要求作相应的运算 
D)控制器直接控制计算机系统的输入与输出操作 
(5)下列叙述中正确的是 
A)将数学信号变换成便于在模拟通信线路中传输的信号称为调制 
B)以原封不动的形式将来自终端的信息送入通信线路称为调制解调 
C)在计算机网络中,一种传输介质不能传送多路信号 
D)在计算机局域网中,只能共享软件资源,而不能共享硬件资源 
(6)各种网络传输介质 
A)具有相同的传输速率和相同的舆距离 
B)具有不同的传输速率和不同的传输距离 
C)具有相同的传输速率和不同的传输距离 
D)具有不同的传输速率和相同的传输距离 
(7)多媒体计算机系统的两大组成部分是 
A)多媒体功能卡和多媒体主机 
B)多媒体通信软件和多媒体开发工具 
C)多媒体输入设备和多媒体输出设备 
D)多媒体计算机硬件系统和多媒体计算机软件系统 
(8)按通信距离划分,计算机网络可以分为局域网和广域网. 下列网络中属于局域网的是 
A)Internet B)CERNET C)Novell D)CHINANET 
(9)在Windows中,启动应用程序的正确方法是 
A)用鼠标双击该应用图标 
B)将该应用程序窗口最小分成图标 
C)将该应用程序窗口还原 
D)将鼠标指向该应用程序窗口 
(10)在Windows中,终止应用程序执行的正确方法是 
A)用鼠标双击应用程序窗口左上角的控制菜单框 
B)将应用程序窗口最小化成图标 
C)用鼠标双击应用程序窗口右上角的还原按钮 
D)用鼠标双击应用程序窗口中的标题栏 
(11)DOS控制键Ctrl+Alt+Del的功能为 
A)删除一个字符并退格 
B)暂停标准输出设备的输出 
C)热启动 
D)终止当前操作 
(12)设当前盘为C盘,为了将A盘当前目录中所有扩展名为.PAS的文件改成扩展名为.P,应使 
用的DOS命令为 
A)REN A:*.PAS A:*.P B)REN A:*.PAS *.P 
C)REN A:.PAS A:.P D)REN A:.PAS .P 
(13)设当前盘为C盘,其根目录下有两个子目录D1和D2,且当前目录为D1,若要进入子目录 
D2,正确的DOS命令为 
A)CD D2 B)CD D2\ C)CD \D2 D)CD D1\D2 
(14)设当前盘为A盘,要将B盘当前目录下的两个文件A.TXT与X.TXT 连接后以文件名Y.TXT 
存放到A盘的当前目录中,正确的DOS命令为 
A)COPY A.TXT+X.TXT A:Y.TXT B)COPY B:A.TXT+X.TXT A:Y.TXT 
C)COPY B:A.TXT+B:X.TXT Y.TXT D)COPY B:A.TXT+B:X.TXT Y.TXT 
(15)下列DOS命令中正确的是 
A)REN \USER\A.TXT \B.TXT B)CD \ 
C)TYPE *.TXT D)MD \ 
(16)根据函数Trunc(x)和Round(x)的定义,可用Trunc(x)来表示Round(x),正确的表示方法 
是 
A)Round(x)=Trunc(x+0.5) B)Round(x)=Trunc(x-0.5) 
┌ 
C)Round(x)=│Trunc(x+0.5) x=0 
│Trunc(x-0.5) x└ 
┌ 
D)Round(x)=│Trunc(x-0.5) x=0 
│Trunc(x+0.5) x└ 
(17)y既不在-2到-1的范围内又不在1到2的范围内,其正确的表达式是 
A)(Abs(y)2) B)(Abs(y)2) 
C)(1(18)有下列程序 
PROGRAM print(Input,Output); 
VAR ch1,ch2,ch3:Char; 
BEGIN 
Readln(ch1); 
Readln(ch2,ch2); 
Readln(ch3,ch3,ch3); 
Readln(ch1,ch2,ch3) 
END. 
若运行时输入 
red 
yellow 
blue 
则正确的输出是 
A)ryb B)reu C)rdl D)blu 
(19)表达式8 MOD(2*(5-3*(4+6*(5 DIV 2))DIV 10))的值是 
A)0 B)1 C)2 D)3 
(20)Integer是 
A)保留字 B)标准标识符 C)用户定义的标识符 D)类型定义 
(21)假设a1,a2,a3是布尔变量,且值均为True,则下列表达式中值为False的是 
A)NOT a1 AND NOT a2 B)a1 OR a2 AND a3 
C)(NOT a1 OR a2) AND (a2 OR a3) D)False OR a1 AND a2 OR NOT a3 
(22)已知ch是字符变量,下列赋值语句中正确的是 
A)ch:='7' B)ch:=7 C)ch:'-7' D)ch:=-'7' 
(23)下列中正确的过程说明和调用是 
A)PROCEDURE proc1(a:Char; VAR b:Char); B) PROCEDURE proc2(a,b:Integer) 
BEGIN BEGIN 
b:=Chr(Ord(a)+1); ... 
procl:=b END; 
END; BEGIN {主程序} 
... 
proc2(3.5,1); 
... 
END. 
C)PROCEDURE proc3(a:Real;VAR b:Real) D) PROCEDURE proc4(c,d:Integer) 
BEGIN BEGIN 
... ... 
END END 
BEGIN {主程序} BEGIN {主程序} 
... a:=1 
x:=1 b:=2 
y:=2 proc4(a,b) 
proc3(x+y,x-y) END 
... 
END 
(24)下面程序中的过程proc的参数表没有给出 
PROGRAM exam(Output) 
VAR a,b:Integer 
PROCEDURE proc(...) 
BEGIN 
c:=a+b 
d:=a-b 
END 
BEGIN 
a:=1 
b:=2 
proc(a,b) 
Writeln(a:2,','b:2) 
END 
则过程proc中的参数表取下列哪种形式,程序的输出是1,2 
A)c:Integer;VAR d:Integer B)VAR c:Integer; d:Integer 
C)c,d:Integer D)VAR c,d:Integer 
(25)一个记录的域标识符不可以与下列哪项相同? 
A)常量标识符 B)函数名 
C)此域标识符所属记录的记录名 D)同层域标识符 
(26)下列各程序段中正确的是 
A)TYPE tocp=^Char B)TYPE torp=^Real 
VAR charp:tocp VAR rp:torp 
BEGIN BEGIN 
New(charp) New(rp) 
IF charp^10 THEN Writeln('Watch out') rp^:=NIL 
... ... 
END END 
C)TYPE tocp=^Char D)TYPE toip=^Integer 
VAR cp:tocp VAR ip1,ip2:toip 
BEGIN BEGIN 
New(cp) New(ip1) 
cp:=NIL New(ip2) 
cp^:='x' ip1^:=5 
... ip1=ip2 
END ... 
END 
(27)下列说法不正确的是 
A)几个指针可以指向同一个动态变量. 
B)p和q分别是指向实型变量和整型变量的指针,值NIL赋给了p, 那么它还可以赋 
给q. 
C)设p,q是指向整型变量的指针,若已执行了下面的语句: 
New(p) 
q:=p 
p^:=5 
Dispose(q) 
那么这时仍可以访问p^. 
D)指针变量可以通过赋值语句改变其值. 
(28)下面关于文件变量的叙述中哪个是错误的 
A)不能用赋值语句给文件变量赋值 
B)若以文件变量作为子程序的形式参数,则只能作为变参,不能作为值参 
C)文件变量的类型只能是文件类型 
D)文件变量可以作为函数的返回值 
(29)要编写并执行一个Pascal程序,一般的步骤是 
A)①用编辑软件编写源程序 
②用Pascal的编译程序把源程序转换为目标程序 
③用连接程序把目标程序转换为可执行程序 
④运行可执行程序 
B)①用编辑软件编写源程序 
②修改,调试源程序 
③用Pascal的编译程序把源程序转换为可执行程序 
④运行可执行程序 
C)①用编辑软件编写源程序 
②有连接程序把源程序转换为可执行程序 
③试运行可执行程序 
④修改后再运行可执行程序 
D)①用编辑软件编写源程序 
②有连接程序把源程序转换为目标程序 
③用Pascal的编译程序把目标程序转换为可执行程序 
④运行可执行程序 
(30)下面是对实型常量的形式定义,其中±表示是正号或负号,a表示整数部分,b 表示小数 
部分,E表示以10为底数的指数,则下面对实型量描述正确的是 
A)±.b B)±E6 C)±IE5 D)±a.bE±0.5 
(31)不能作为子界类型的基类型的是 
A)实数类型 B)枚举类型 C)字符类型 D)布尔类型 
(32)下列语句对数组num进行说明,其中不正确的是 
A)VAR num:ARRAY[Boolean] OF Boolean 
B)VAR num:ARRAY[10,10] OF Boolean 
C)VAR num:ARRAY[0..8] OF ARRAY[5..10] OF Integer 
D)VAR num:ARRAY[-1..5,'a'..'e'] OF Real 
(33)下面哪个关于指针类型的叙述是错误的 
A)指针类型可以作为数组的基类型 
B)指针类型可以作为集合的基类型 
C)指针类型可以作为函数返回值的类型 
D)指针类型可以作为函数的形式参数的类型 
(34)设有说明 VAR p,q:^Integer 
j,k:^Char 
n:Integer 
则下列语句正确的是 
A)n:=p^ B)p:=n C)p^:=j^ D)p:=2*q+1 
(35)已知有说明VAR a,b,c:Integer;键盘输入变量a的值域为[0,5], 则下面正确的CASE语 
句是 
A)Readln(a) B)Readln(a) 
CASE a OF CASE a OF 
0,1,2:Writeln('a*a=',Spr(a)) 0,1,2:Writeln('a*a='Spr(a)) 
3:b:=Spr(a)-a 3:Writeln('a*a-a=',Spr(a)-a) 
Writeln('c=',c) 1,4,5:Writeln('a+a=',a+a) 
4,5:Writeln('a+a=',a+a) END 
END 
C)Readln(a) D)Readln(a) 
CASE a OF CASE Sqr(a)/a OF 
0,1,2:Writeln('a*a=',Spr(a)) 0,1,2:Writeln('a*a=',Sqr(a)); 
3:BEGIN 3:BEGIN 
b:=Spr(a)-a b:=Sqr(a)-a; 
Writeln('c=',c) Writeln('c=',c); 
END END; 
4,5:Writeln('a+a='.a+a) 4,5:Writeln('a+a=',a+a) 
END END; 
(36)设有说明VAR x,y:(d,c,b,a); 
执行下面3条语句后的输出是 
x:=a; 
y:=c; 
Writeln(Ord(y-Ord(x)); 
A)1 B)-2 C)2 D)3 
(37)要使语句IF a IN b THEN ;无语法错误,a,b的类型应该是 
A)a是集合类型,b的类型与a的基类型相同 
B)b是集合类型,a的类型与b的基类型相同 
C)a和b都是集合类型 
D)a,b中的任何一个都可以是集合类型,另一个则是此集合的基类型 
(38)设a,b是整型变量且已赋值,函数首部为FUNCTION func(VAR a:Integer):Integer; 
下面正确的函数调用是 
A)b:=func(func(b)) B)Writeln(func(a+b)) 
C)Writeln(Ord(func(b))) D)b:=func(Succ(func(b))) 
(39)设a为集合变量,下面哪一组中的两个表达式的值是不同的 
A)a+a-a和a-a+a B)a+a*a和a 
C)(a+a)*a和a D)a-a*a和(a+a)*a-a 
(40)设有说明如下: TYPE rec=RECORD 
a,b:Integer 
END 
ft=FILE OF rec 
VAR f: ft 
s: rec 
ft类型文件abc.dat中有一条rec型记录,要取出记录中的两个整数并输出,应使用的程 
序段是 A)Assign(f,'abc.dat') B)Assign(f,'abc.dat') 
Reset(f) Reset(f) 
Read(f,s.a,s.b) Readln(f,s) 
Close(f) Close(f) 
Writeln(s.a,s.b) Writeln(s.a,s.b) 
C)Assign(f,'abc.dat') D)Assign(f,'abc.dat') 
Reset(f) Reset(f) 
Readln(f,s.a,s.b) Read(f,s) 
Close(f) Close(f) 
Writeln(s.a,s.b) Writeln(s.a,s.b)