基础知识和QBASIC 语言程序设计

（考试时间120分钟，满分100分）


一、选择题（（1）－（40）题每题1分，（41）－（50）题每题2分，共60分）
下列各题A、B、C、D四个选项中，只有一个选项是正确的，请将正确选项涂写在答题卡相应位置上，答在试卷上不得分。
（1）微型计算机的性能主要取决于
A 内存
B 中央处理器
C 硬盘
D 显示卡
（2）有一个数值152，它与十六进制数6A相等，那么该数值是
A 二进制数
B 八进制数
C 十进制数
D 四进制数
（3）使用超大规模集成电路制造的计算机应该归属于
A 第一代
B 第二代
C 第三代
D 第四代
（4）已知英文字母A的ASCII代码值是十六进制数61H，那么字母d的ASCII码值是
A 34H
B 54H
C 24H
D 64H
（5）一片存储容量是1．44MB的软磁盘，可以存储大约140万个
A ASCII字符
B 中文字符
C 磁盘文件
D 子目录
（6）在MS－DOS环境中同时按下〔CTRL〕和〔BREAK〕两个键，其作用是
A 终止当前操作
B 暂停当前操作
C 关机
D 热启动
（7）将二进制数10000001转换为十进制数应该是
A 127
B 129
C 126
D 128
（8）磁盘处于写保护状态，那么磁盘中的数据
A 不能读出，不能删改，也不能写入新数据
B 可以读出，不能删改，也不能写入新数据
C 可以读出，可以删改，但不能写入新数据
D 可以读出，不能删改，但可以写入新数据
（9）微型机启动后，DOS提示符是C：\〉，现提示符变为C：\USER〉，则说明刚执行过命令
A PROMPT
B PROMPT USER
C PROMPT $P$G
D CD USER
（10）MS－DOS文件系统目录的组织形式属于
A 关系型结构
B 网络型结构
C 树型结构
D 直线型结构
（11）应用软件系统TH的总容量大约1MB，其主要程序文件存放在C：\ TH目录中，而数据文件存放在C：\TH\DATA目录中。如果将它们完整地复制到A盘，应该使用的命令是
A XCOPY C：\TH A：\
B XCOPY C：\TH A：\ /S
C XCOPY C：\TH A：\ /M
D XCOPY C：\TH A：\ /P
（12）执行COPY A．TXT＋B．TXT这个DOS命令后，得到的磁盘文件是
A A．TXT
B B．TXT
C AB．TXT
D A＋B．TXT
（13）在WINDOWS中，将一个应用程序窗口最小化之后，该应用程序
A 仍在后台运行
B 暂时停止运行
C 完全停止运行
D 出错
（14）CD－ROM属于
A 感觉媒体
B 表示媒体
C 表现媒体
D 存储媒体
（15）在因特网（INTERNET）中，电子公告板的缩写是
A FTP
B WWW
C BBS
D E－MAIL
（16）进入QBASIC操作环境，它提供＿＿＿＿个窗口
A 1
B 4
C 3
D 2
（17）在QBASIC中，下面四个数中，作为常量有语法错误的是
A 123．456＃
B 1234！
C 1．23D－23
D 1．89E1．1
（18）在QBASIC中，12345678＆的类型是
A 整数型
B 长整数型
C 字符常数
D 双精度数
（19）下列变量名不合法的是
A A2（2，4）
B ABCD
C A$X
D CDE
（20）DIM A（10 TO 20）所定义的数组元素个数是
A 11
B 20
C 30
D 10
（21）在QBASIC语言中，行号或标号的作用是表明
A 执行程序的顺序
B 程序编排的顺序
C 转移指向的标志
D 无作用
（22）QBASIC中，执行下面的四个语句时出现错误的是
A X＝SGN（0）
B X＝SQR（0）
C X＝LOG（0）
D X＝SIN（0）
（23）在QBASIC程序中，一行中多于一个语句时，语句间的分隔符是
A 空格
B ，
C ：
D ；
（24）下面的四个QBASIC逻辑表达式语法正确的是
A A＞B　．AND．　B＜＞C
B A＞BC
C A＞B AND　＜＞C
D A＞B AND　B＜＞C
（25）在QBASIC中下面的四组READ／DATA语句，语法上错误的是
A READ XX，YY，ZZ$ DATA 11，22，33
B READ XX$，YY $，ZZ $， DATA 11，22，33
C READ XX$，YY$，ZZ$， DATA AA，BB，CC
D READ XX，YY，ZZ DATA AA，BB，CC
（26）在QBASIC 中下面的四个数组说明语句语法正确的是
A DIM A〔10〕
B DEF FN （10）
C DIM A（10）
D DIMENSION A（10）
（27）语句PRINT"25*40"输出结果是
A "25*40"
B 出现错误信息
C 25*40
D 1000
（28）在第20行第5列输出一字符所用的定位语句是
A LOCATE 20，5
B COL 5，ROW 20
C LINE 20，COLUMN 5
D LOCATE 5，20
（29）正确的单行自定义函数语句是
A DEF ab（x，y）＝a^3＝b^2
B DEFINE fnxy（）＝x^3y^2
C DEE fna（x，y）＝x^3＋y^2
D DEF fn（x，y）＝x^3y^2
（30）表达式INF（RND*11）＋100的值的范围是
A 〔11，110〕
B 〔100，110〕
C 〔11，100〕
D 〔0，100〕
（31）有如下程序
a＝1
b＝2
c＝3
a＝b 
b＝c 
c＝a
PRINT a；b；c；
END
运行后输出的结果是
A 1 2 3 
B 2 3 1 
C 2 3 2
D 2 2 3
（32）有如下程序
a＝3
b＝4
PRINT a＝b
END
运行后输出的结果是
A 0
B 3
C 4
D 显示出错信息
（33）有如下程序
FOR m＝1 TO3
FORj＝1TO m
FOR k＝j TO3
n＝n＋1
NEXT k
NEXT j
NEXT m
END
运行后 n 的值为
A 3
B 14
C 9
D 21
（34）有如下程序
a$＝"12"
b$＝"34"
c$＝a$＋b$
d＝VAL（c$）
PRINT d\10
END
运行后输出的结果是
A 12
B 34
C 46
D 123
（35）有如下程序
a＝12．3
b＝－123
m＝LEN（STR$（a）＋STR$（b））
PRINTm
END
执行后输出的结果是
A 9
B 5
C 7
D 8
（36）有如下程序
FORj＝1TO15
a＝a＋jMOD3
NEXTj
PRINTa
END
运行后输出的结果
A 1
B 15
C 90
D 120
（37）要将x,y两个变量的值互换，正确的语句是
A SWAPx,y
B SHIFTx,y
C xSWAPy
D CHANGEx,y
（38）有如下程序
DEFSTR A－B
a$＝"123"
b＝"456"
c＝VAL（a$）＋VAL（b)
PRINTc
END
执行后输出的结果是
A 123
B 显示出错信息
C "579"
D 579
（39）有如下程序
a$＝"Bird":c$＝"fly"
PRINTa$＋"can"＋c$＋"！"
END
运行后的输出的结果是
A Bird can fly！
B Bird＋can＋fly＋！
C Birdcanfly！
D "Bird can fly！"
（40）有如下程序
FORx＋1 TO 2
a＝1
FOR y＝1TO x＋1
a＝a＋1
NEXT y
PRINT a；
NEXT x
END
运行时输出的结果是
A 1 1
B 0 0
C 1 2
D 2 3
（41）有如下程序
DEF fna （x，y）＝x * y＋3 * y＋x\y
x＝4
y＝3
PRINT fna（y，x）
END
运行时输出的结果是
A 22
B 23
C 24
D 22．33
（42）有如下程序
n$＝"nnnnn"
MID$（n$，2，2）＝"NN"
PRINT n$
END
运行输出n$的结果是
A NN
B nNNnn
C nnNN
D NnnNN
（43）有如下程序
FOR j＝1TO10
READ a
IFa/3＝a\3ORa/5＝a\5 THEN sum＝sum＋a
NEXT j
PRINT "sum＝"；sum
DATA 19，17，15，13，11，9，7，5，3，1
END
运行时输出sum的值是
A 27
B 15
C 32
D 20
（44）执行PRINT USING"＃＃＃．＃＃％"；123．456的结果
是
A 123．456％
B 123．46
C 123．46％
D 123．45％
（45）有如下程序
sum＝0
FOR j ＝1 TO 10
IF j ＝10 THEN
ELSE
sum＝sum＋j
END IF
NEXT j
PRINT sum
END
运行时输出的结果是
A 45
B 55
C 显示错信息
D 36
（46）有如下程序
s＝0
DO
s＝（s＋1）*（s＋2）
number＝number＋1
LOOP UNTIL s〉＝30
PRINT number；s
END
运行输出的结果是
A 0 1
B 30 30
C 4 30
D 3 182
（47）有如下程序
m＝1
FOR k＝3 TO 1 STIP－1
x$＝STRING$（x，" * "）
PRINT m ; x$
m＝m＋1
NEXT k
END
运行后输出的是
A 1 *
2 * *
3 * * *
B 1 *
2 *
3 *
C 3 * 
2 * * 
1 * * *
D 1 * * *
2 * *
3 *
（48）有如下程序
DECLARE SUB f（k，s）
total＝0
FOR k＝2 TO 4
CALL f（k，s）
total＝total＋s
NEXT k
PRINT total
END 
SUB f（k，s）
s＝1
FOR m＝1 TO k
s＝s * m
NEXT m
END SUB
运行时输出的结果是
A 9
B 32
C 6
D 8
（49）有如下程序
score＝INT（RND * 10）＝80
SELECT CASE score
CASE IS 〈60
a$＝"F"
CASE 60 TO 69
a$＝"D"
CASE 70 TO 79
a$＝"C"
CASE 80 TO 89
a$＝"B"
CASE ELSE
a$＝"A" 
END SELECT
PRINT a $
END
运行时输出的结果是
A A
B B
C C
D D
（50）有如下程序
CLS：SCREEN 13：COLOR 3
RANDOMIZE TIMER
x0＝160：y0＝100
FOR j＝1TO5
IF RND〉．5 THEN a＝1ELSE a＝－1
IF RND〉．5 THEN b＝1ELSE b＝－1
x＝ a *INT（RND *50＋5）： y b *INT（RND *40＋5）
r＝INT（RND *40＋5）：c＝INT（RND * 15＋1）
a：CIRCLE（ x0＋x，y0＋ y），＿＿＿＿，c
NEXT j
END
该程序要完成的功能是画出五个不同颜色，不同大小，不同位置的圆。应在标号为
a 的语句之空白处加入的正确内容是
A x0
B y0
C r
D a
二、填空题：（每格2分，共40分）
请将每一个空的正确答案写在答题卡1至20序号的横线上，答在试卷上不得分。
（1）DOS中的自动批处理文件的全名是＿＿＿＿
（2）在DOS启动盘中，除COMMAND．COM外，不宜 两个必备的系统文件，它们是MSDOS．SYS（或IBMDOS．COM）与＿＿＿＿
（3）在DOS下，要将当前目录中AB．TXY文件设置为只读属性，应该使用的完整命令行是＿＿＿＿
（4）在DOS下，要查看当前目录中所有批处理文件的总字节数，应该使用的完整命令行是＿＿＿
（5）计算机病毒除有破坏性、潜伏性和激发性外，还有一个最明显的特性是＿＿
（6）数学式x+cos(lny)=ex的QBASIC表达式＿＿＿＿
（7）在QBASIC程序中定义全局变量ab的语句是＿＿＿＿
（8）表达式25 MOD（1－2＾3）的值为＿＿＿＿
（9）四个字符串"ABC"、"abc"、"ABCDE"及"afgh" 中的最大者为＿＿＿
（10）下面程序运行后的输出结果如下：
D
CD
BCD
ABCD
但程序不完整，请在＿＿＿处补充使之完整。
a$＝"ABCD"
FOR m ＝1 TO 4
PRINT TAB（5－m）；＿＿＿＿
NEXT m
END
（11）下面一段程序定义了一个记录，包括nam、age及wage三个域，但程序不完整，请在＿＿＿＿处补充使之完整。
TYPE employer
nam AS STRING *12
age AS INTEGER
wage AS INTEGER
＿＿＿＿
（12）下面程序运行后的输出是＿＿＿＿
k＝1
FOR j＝2 TO 5
k＝ k * j
NEXT j
PRINT k＋j
END
（13）下面的程序是用选择交换法将10个数排成升序，请在＿＿＿＿处将程序补充完整．
OPTIN BASE 1
n＝10
DIM array(n)
PRINT"data before sorring:"
FORi＝1 TO 10
READ array(i):PRINT array(i);
NEXT i
DATA 123，96，42，39，22，14，7，4，0，－7
PRINT
FORi＝＿＿＿＿
k＝i
FOR j＝＿＿＿＿
IFarray(k)>array(j)THEN＿＿＿＿
NEXTi
IFk<>i THEN SWAP array(k),array(i)
NEXT i
PRINT"dara after sorting:"
FORi＝1 TO 10
PRINT array(i);
NEXT i
PRINT
END
（14）下面程序运行后输出y的值是＿＿＿＿
FOR a＝1TO 5
y＝1
FOR b＝1 TO 5
FOR c＝1 TO 5
y＝y＋i
NEXT c
NEXT b
NEXT a
PNINT "y＝";y
END
（15）下面程序的作用是利用随机函数产生10个100－200之间（包含100、200）的随机整数，打印其中7的倍数的数并求出它们的总和。请根据程序的需要在＿＿＿＿上填出正确内容。
RANDOMIZE TIMER
FOR m＝1 TO 10
x＝INT（RMD＊＿＿＿＿）
IF＿＿＿＿THEN
PRINT x;
k1＝k1＋x
＿＿＿＿
NEXT m
PRINT
PRINT "k1＝";k1
END
（16）下面程序运行后输出的结果是＿＿＿＿
FOR j＝1 TO 3
READ a $
st$＝st$＋LEFT$（a $,j）
NEXT j
PRINT st $
DATA sun,echo,ondometer
END

推荐给我的朋友

[关闭窗口]