全国计算机等级考试二级笔试试卷
基础部分和QBASIC语言程序设计
(考试时间：120分钟，满分100分)
1999年9月
一、选择题((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
B) 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
B) 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) QBASIC语言中,数据的类型有
A) 三种 B) 四种 C) 五种 D) 六种
(17) 在QBASIC中,变量abc&的类型是
A) 字符型 B) 长整型 C) 整型 D) 双精度型
(18) 下面四项中不能作为QBASIC变量的是
A) XYZ.XYZ B) UVWXYZ123456 C) sincos D) 123XYZ
(19) 下面四项中不能作为QBASIC常量的是
A) 123% B) 1.23E1.5 C) "abc$" D) 3.15D-2
(20) 表达式9^2MOD9\3*2/3的值是
A) 3 B) -1 C) 1 D) 0
(21) 在QBASIC语言中Y1+Z2=a*SIN(b*x+c)+k表达式的类型是
A) 算术表达式 B) 关系表达式 C) 逻辑表达式 D) 字符表达式
(22) QBASIC 语言输出语句PRINT 的输出项表列中,下面四个符号可以作为分隔符的是
A) ? B) * C) : D) ;
(23) 语句DIM arr(-3 to 5, 2 to 6) AS INTEGER定义的数组元素有
A) 45个 B) 40个 C) 11个 D) 54个
(24) 指定在第20行第10列作为下一个打印项的起始位置所用的定位语句是
A) LOCATE 10,20 B) LOCATE 20,10
C) LINE 10,COLUMN 20 D) POSITION 20,10
(25) 正确的自定义函数语句是
A) DEF fnxy(x,y)=x+y B) DEF fnxy(x,y)=a+b
C) DEFINE fnxy(x,y)=a+b D) DEFINITOIN fnxy(x,y)=x+y
(26) 函数INT(RND*6+1)的取值范围是
A) 从1到7七个整数 B) 从0到7八个整数
C) 从1到6六个整数 D) 从0到6七个整数
(27) 有如下程序
a=3: b=4
PRINT b>a
END
运行后,输出的结果是
A) -1 B) 0 C) 4>3 D) 显示出错信息
(28) 有如下程序
DEF fna(a,b,c)=(a+b*b)*c
a=3: b=5: c=7
abc=fna(c,a,b)
PRINT abc
END
运行后,输出的结果是
A) 98 B) 96 C) 80 D) 196
(29) 有如下程序
FOR x=1 TO 3
PRINT TAB(3*x); 22*x
NEXT x
END
运行后,输出的结果是
A) 22 B) 22 C) 22 D) 22 44 66
44 44 44
66 66 66
(30) 有如下程序
a=0
FOR j=1 TO 20 STEP
a=a+j\5
NEXT j
PRINT a
END
运行后,输出的结果是
A) 12 B) 16 C) 40 D) 100
(31) 有如程序
FOR m=1 TO 4
a=0
FOR j=1 TO 5
a=1
FOR k=1 TO 6
a=a+3
NEXT k
NEXT j
NEXT m
PRINT a
END
运行后,输出的结果是
A) 18 B) 19 C) 91 D) 432
(32) 有如下程序
a$="Good Morning"
b$="Even"
c$=LEFT$(a$,4)+LCASE$(b$)+RIGHT$(a$,3)
运行后,c$的值是
A) Good Evening B) Good evening C) good evening D) Good Even
(33) 有如下程序
a$="34": b$="45": c$="-"
d$=b$+c$+a$
PRINT VAL(d$)
END
运行后,输出的结果是
A) 11 B) 34 C) 45 D) 79
(34) 有如下程序
x=1
FOR k=1 TO 3
IF k IF k IF k>=3 THEN a=x*x+2
PRINT a;
NEXT k
END
运行后,输出的结果是
A) 2 5 11 B) 1 1 1 C) 1 5 11 D) 2 2 3
(35) 有如下程序
INPUT a, b, c
d=(a+b+ABS(a-b))/2
d=(d+c+ABS(d-c))/2
PRINT d
END
运行时,在键盘上输入1,3和5三个数字,输出的结果是
A) 2.5 B) 5 C) 3 D) 8
(36) 有如下程序
a=1: b=2: c=3
a=a+b: b=b+a: c=b+a
IF a3 OR b3 THEN
a=b-a: b=c-a: c=b+a
END IF
PRINT a+b+c
END
运行后,输出的结果是
A) 16 B) 3 C) 6 D) 8
(37) 有如下程序
READ x,x,y,z$
a=x+y+VAL(z$)
RESTORE 10
READ x,y,z$
a=a+x+y+VAL(z$)
PRINT a
DATA 1,2
10 DATA 3,4
DATA A,B
END
运行后,输出的结果是
A) 15 B) 16 C) 18 D) 显示错误信息
(38) 有如下程序
DEFSTR X-Z
x="123"
y="456"
z=x$+y$
PRINT z$
END
运行后,输出的结果是
A) 显示出错信息 B) 123456 C) "579" D) 579
(39) 有如下程序
a$="1223458764"
d$=LEFT$(a$, 1)
FOR i=2 TO LEN(a$)
z$=MID$(a$,i,1)
IF z$>d$ THEN d$=z$
NEXT i
PRINT d$
END
运行时输出的结果是
A) 1 B) 7 C) 4 D) 8
(40) 有如下程序
x=0
FOR m=3 TO 5
GOSUB a:
x=x+s
NEXT m
PRINT x
END
a:s=s^2+1
RETURN
运行后输出的是
A) 7 B) 8 C) 6 D) 9
(41) 有如下程序
OPION BASE 1
DIM aj(1 TO 10)
FOR j=6 TO 10
READ aj(j)
NEXT j
PRINT aj(1)+aj(j)
DATA 1,2,3,4,5
END
运行后输出的是
A) 5 B) 6 C) 1 D) 显示出错信息
(42) 有如下程序
DECLARE SUB A(x,y)
x=5: y=4
CALL A((x),y)
PRINT x, y
END
SUB A(x,y)
t=x
x=t/y
y=t MOD y
END SUB
运行后输出的是
A) 1 1 B) 5 4 C) 1 4 D) 5 1
(43) 有如下程序
x=1: y=2: z=3
FOR j=1 TO 3
IF j=1 THEN
x=x+y+z
ELSE j=2 THEN
x=2*x+2*y+2*z
ELSE
x=3*x+3*y+3*z
END IF
NEXT j
PRINT x
END
运行后,输出x的值是
A) 31 B) 18 C) 6 D) 12
(44) 有如下程序
FOR j=1 TO 3
FOR k=1 TO 3
arr(j,k)=(j-1)*3+k
NEXT k
NEXT j
FOR j=2 TO 3
FOR k=2 TO 3
PRINT arr(k,j);
NEXT k
PRINT
NEXT j
END
运行时输出的结果是
A) 2 5 B) 5 8 C) 4 7 D) 5 9
3 6 6 9 5 8 6 8
(45) 有如下程序
FOR m=3 TO 1 STEP -1
x$=STRING$(m,"@")
PRINT m; x$
NEXT m
END
运行时输出的结果是
A) 1 @ B) 1 @ C) 3 @ D) 3 @@@
2 @@ 2 @ 2 @@ 2 @@
3 @@@ 3 @ 1 @@@ 1 @
(46) 有如下程序
DECLARE SUB multi(k,s)
sum=0
FOR=3 TO 5
CALL multi(k,s)
sum=sum+s
NEXT k
PRINT sum
END
SUB multi(k,s)
s=1
FORj=1 TO k
s=s*j
NEXT j
END SUB
运行后输出的结果是
A) 9 B) 120 C) 150 D) 20
(47) 有如下程序
INPUT "Input one letter: ",infocase$
SELECT CASE infocase$
CASE "a"
grade$="Very good"
CASE "b"
grade$="Good"
CASE "c"
grade$="OK"
CASE "d"
grade$="Qualified"
CASE ELSE
grade$="Bad"
END SELECT
PRINT grade$
END
运行时从键盘上输入英文小字母d后,输出的结果是
A) Very good B) Good C) Bad D) Qualified
(48) 有如下程序
total=0
FOR k=1 TO 3
IF k>=1 THEN
part=1
ELSEIF k>=2 THEN
part=2
ELSEIF k>=3 THEN
part=3
ELSE
part=4
END IF
PRINT part:
total=total+part
NEXT k
PRINT total
END
运行时输出的结果是
A) 3 3 3 9 B) 3 2 1 6 C) 1 1 1 3 D) 1 2 3 6
(49) 有如下程序
DO
READ x,y,z
x=x-y
LOOP UNTIL x=-1 AND z=1
PRINT x;y;z
DATA 9,2,3,8,1,1,5,1,7,1,1
END
运行时输出的结果是
A) 8 9 1 B) 4 1 1 C) -1 9 1 D) 9 2 3
(50) 有如下程序
CLS
x1=180:x2=100:Y2=100
SCREEN 1,0:COLOR 5
LINE (x1,y1)-(x2,y2),,B
END
运行后屏幕上显示的是
A) 一条直线 B) 一个矩形空框
C) 一个填充了颜色的形 D) 无任何显示
二、填空题(每空2分，共40分)
请将每空的正确答案写在答题卡上【1】-【20】序号的横线上，答在试卷上不得分。
(1) DOS命令分为内部命令与外部命令，PATH命令是 【1】 命令。
(2) 设当前盘为A盘，当前目录为\X\Y，A盘上的一个文件QR.C 在当前目录下的子目录W中。现已将A盘的当前目录改为\D\XY，当前盘改为C盘，如果需指定A盘上的该文件应写成 【2】 。
(3) 为了得到XCOPY命令的在线帮助，可使用的DOS命令文件一为 【3】 。
(4) 在DOS系统下，代表键盘与显示器的设备文件名为 【4】 。
(5) 在DOS系统下，可以直接执行的文件的扩展名除.FXE外，还有两个是 【5】 。
(6) 数学式 的QBASIC表达式为 【6】 。
(7) 表达式FIX(-23.87)+INT(24.56)的值为 【7】 。
(8) 有如下程序
sum =1
FOR x=3.2 TO 5.7 STEP 0.8
sum=sum+1
NEXT x
运行后,sum的值是 【8】 。
(9) 有如下程序
k=0
DO WHILE k k=k+1
k=2*k+k*K
a=a+k
LOOP
PRINT a
END
运行后,a的值是 【9】 。
(10) 下面程序运行后输出的结果如下:
12345
2345
345
45
5
但程序不完整,请在【10】处补充使之完整.
n$="12345"
FOR k=LEN(n$) TO 1 STEP -1
PRINT TAB(10-k); 【10】
NEXT k
END
(11) 下面一段程序单元定义了一个名字为"books "的记录,其四个域的域名及数据类型如下:
域名 数据类型 数据长度
title 字符型 40
author 字符型 20
price 单精度实型
press 字符型 30
但程序不完整,请在 【11】 处补充使之完整。
TYPE books
title AS STRING*40
author AS STRING*20
price 【11】
press AS STRING*30
END TYPE
(12) 下面程序的功能是用比较交换法将10个数排为升序,请在【12】、【13】、【14】处将程序补充完整。
DIM num(0 TO 9)
PRINT "data before sorting:"
FOR i=0 TO 9
READ num(i): PRINT num(i);
NEXT i
DATA 123,451,79,39,322,14,91,4,83,777
PRINT
FOR i= 【12】
FOR j= 【13】
IF num(i)>num(j) THEN 【14】
NEXT j
NEXT i
PRINT "data after sorting:"
FOR i=0 TO 9
PRINT num(i);
NEXT i
PRINT
END
(13) 有如下程序
n=1
FOR a=1 TO 5
n=1
FOR b=1 TO 10
n=1
FOR c=1 TO 5
n=n*c
NEXT c
NEXT b
NEXT a
PRINT a; b; c; n
END
运行后输出a,b,c,及n的值是 【15】 。
(14) 下面程序的功能是从键盘输入一个两位正整数n,找出该数以内的勾股数(即在n以内的三个正整数a,b,c,满足c2=a2+b2),运行时将n和满足条件的数显示在屏幕上并写入顺序文件group.dat。此程序不完整,请在【16】、【17】、【18】、及【19】填入所需的程序成分。
OPEN "group.dat" FOR OUTPUT AS #1
INPUT n
WRITE #1,n
FOR a=1 TO n
FOR b=a+1 TO n
FOR c=1 TO n
IF c*c= 【16】 THEN
PRINT 【17】
WRITE #1, 【18】
END IF
NEXT c
NEXT b
NEXT a
【19】
END
(15) 下面程序的功能是利用随机函数产生30个100-300之间(包含100和300)的随机整数,打印其中5的倍数和7的倍数并求其总和,请根据程序的需要在【20】处填上正确内容。
RANDOMIZE TIMER
FOR k=1 TO 30
x=INT(RND(1)* 【20】 )
IF (x MOD 5=0) OR (x MOD 7=0) THEN
PRINT x
m=m+x
END IF
NEXT k
PRINT
PRINT "m="; m
END
[完]
