2004--2005学年下学期期中考试
QBASIC试题
一、 填空题：（每空1分，共20分）
1、 FOR→NEXT结构中，STEP项省略时，步长默认为
2、 按 键，可终止程序运行。
3、 清屏命令为
4、 在当型循环中，条件为 时，执行循环。
5、 在直到型循环中，条件为 时，跳出循环。
6、 在循环语句中，WHILE和 相配套，DO WHILE和 相配套。
7、 程序 FOR I=4 TO 1 STEP -2
INPUT a
NEXT I
的循环次数为
8、 数组是
9、 省略类型说明符的数组，默认为 类型。
10、 数组A（5）的下标下界为 ，上界为
11、 二维数组A（1，4）中有 个元素。
12、 DIM B%（2，6），该数组的类型为
13、 QBASIC规定数组下标值的范围在 和 之间。
14、 DIM A（2，6） AS STRING 等同于
15、 A=1：B=2
SWAP A，B
请输出A，B的值为 ，
16、 产生（0~90）范围内的随机整数公式是
二、 选择题（每题2分，共20分）
1 以下表达式中哪个表达式的值与其它三个不同（ ）
A INT（-4.6）-4.6 B LOG（EXP（-5.6））
C -ABS（-5.6） D SGN(-5.6)-4.6
2 在下面的关系表达式中,当X取任何数均成立的表达式是( )
A INT(X) >= ABS(X) B INT(X) =ABS(X)
C INT(X) <= ABS(X) D INT(X) <> ABS(X)
3 能够产生一个[ 10,50 ]区间内的随机整数的QBASIC表达式是( )
A INT(RND*40+10) B INT(RND*41+10)
C INT(RND*40+11) D INT(RND*10+40)
4 语句X=INT(29*RND+21)其中X值的范围是( )
A 0<X<49 B 0<X<29
C 29<X<50 D 21< =X< =49
5 在下面的语句中,正确的有( )
A INPUT X=2 B READ A,B$,C
C X=Y=Z D DATA 2,”ABD” ,1/2
6 语句 PRINT 3*3\3/3 的执行结果是( )
A 9 B 3 C 1 D 0
7已有语句B%=6.95:B=125.5 执行 PRINT B% 语句后,输出结果为( )
A 6 B 7 C 123 D 6.95
8 语句定义符REM的作用是( )
A 改名语句 B 重新编行号
C 恢复语句 D 注释语句
9 数组A(1,1)的元素个数为( )
A 1个 B 2个 C 3个 D 4个
10若数组的下标上界不超过( ),可不定义该数组,直接使用.
A 11 B 9 C 10 D 8
三、 判断题(每题1 分,共10分)
1、数组的下界默认为1.( )
2、DIM A(3),数组 A(3) 为单精度类型.( )
3、REDIM 语句可对静态数组重新定维.( )
4、QBASIC中,SIN 30 0应写成SIN(30*∏/180)（ ）
5、Qbasic中，log1025可表示为loge25/loge10. ( )
6、数组下标值的范围为-32768~32767.( )
7、INT(-13.82)的值为-13.( )
8、INT(10*RND)可产生0~9间的随机整数.( )
9、函数SGN(-8)的值为-8.( )
10、数组必须先定义说明然后才能使用.( )
四、 程序运行题.(每题5分,共20分)
1 DIM M(10)
FOR I=0 TO 10
M(I)=2*I
NEXT
PRINT M(I-1)
END
该程序运行的结果为
2 DIM A AS INTEGER
FOR I=1 TO 10 STEP 2
A(I)=I*10+I
NEXT
PRINT A(1)/A(3)
END
该程序运行的结果为
3.DIM A(-3 TO 5),B(-3 TO 5),C(-4 TO 5)
FOR I =-3 TO 4
READ A(I),B(I) C(I)=A(I)+B(I+1)/2
NEXT
PRINT C(4)
DATA 1,3,5,7,9,11,13,15,17
DATA 2,4,6,8,10,12,14,16,18
该程序运行的结果为
4.DEF FNX(A,B,C)=(3+B*C)/A
X=3:Y=4:Z=5
PRINT FNX(A,B,C)
END
该程序运行的结果为
五．程序填空题（每空1分，共16分）
1．下面的程序是随机产生10个100----300间的随机整数，
判断100—200，200-300区域内的整数个数。
DIM A（ ）
FOR I= TO
INPUT
SELECT CASE
CASE 100 TO 200
CASE
B=B+1
ENDSELECT
NEXT
PRINT A， B
END
2．编写一个程序，使用一维数组存放20个评委打分，0~10中去掉一个最高分
和一个最低分，求最后的平均分。
DIM A（20）
FOR I= TO
INPUT A（I）
NEXT
MAX=
MIN=
ASUM=
FOR I=1 TO 20
SUM=SUM+
IF A（I）>MAX THEN
IF THEN MIN=A(I)
NEXT
AVER=(SUM-MAX-MIN)/
PRINT INT(AVER*100+0.5)/100
END
六．编程题（每题7分，共14分）
1.从键盘依次输入10个整数，按相反的顺序输出。
2．试编程求符号函数。（要求：用单行或多行自定义函数实现）
中专理科试题 -> qbasic试卷