=版权所有  软件 下载  学院  版权所有=
　　
　　 一、选择题（（1）～（40）题每题1分，（41）～（50）题每题2分，共60分）

　　下列各题A）、B）、C）、D）四个选项中，只有一个选项是正确的，请将正确选项涂写在答题卡相应位置上，答在试卷上不得分。

　　（1）用8位无符号二进制数能表示的最大十进制数为
　　A）127 B）128 C）255 D）256
　　（2）在64位高档微机中，一个字长所占的二进制位数为
　　A）8 B）16 C）32 D）64
　　（3）在Windows环境下，为了复制一个对象，在用鼠标拖动该对象时应同时按住
　　A）Alt键 B）Esc键 C）Shift键 D）Ctrl键
　　（4）在Windows菜单中，暗淡（灰色）的命令项表示该命令
　　A）暂时不能用 B）正在执行 C）包含下一层菜单 D）包含对话框
　　（5）在DOS环境下，为了得到TYPE命令的帮助信息，正确的DOS命令为
　　A）TYPE B）TYPE /H C）TYPE /* D）TYPE /?
　　（6）下列选项中，能作为合法DOS文件名的是
　　A）ANP/A.DAT B）ABCCOM C）ECD.BASIC D）XY+Z.TXT
　　（7）下列叙述中正确的是
　　A）在Windows环境下，最大化的窗口是不能移动的
　　B）在Windows环境下，应用程序窗口最小化后，该应用程序暂停执行
　　C）在Windows环境下，只有最小化的窗口才能关闭
　　D）在Windows环境下，不能关闭最大化的窗口
　　（8）在Windows环境下，工具栏中的复制按钮是
　　A） 打印机图标 B) 剪刀标志 C) 复制标 D) 粘贴标志
　　（9）在Windows环境下，若要将整个屏幕上显示的内容存入剪贴板，可以按
　　A）Ctrl＋PrintScreen键 B）Alt＋PrintScreen键
　　C）Shift＋PrintScreen键 D）PrintScreen键
　　（10）目前，计算机病毒扩散最快的途径是
　　A）通过软件复制 B）通过网络传播
　　C）通过磁盘拷贝 D）运行游戏软件
　　（11）在QBASIC集成开发环境中，在编辑源程序后要运行程序，应按下键盘上的
　　A）F2键 B）F5键 C）Enter键 D）End键
　　（12）关于QBASIC 源程序语句中行号的说法正确的是
　　A）必须有行号 B）不允许有行号 C）根据需要可有可无 D）只允许有标号
　　（13）在QBASIC中，常量3E1的数据类型是
　　A）字符串 B）单精度实型 C）双精度实型 D）整型
　　（14）在下列四个式子中，非法的QBASIC表达式是
　　A）a=abs B）5〉3+3 C）a+b=c D）5〈〉5
　　（15）QBASIC表达式3^3/3 MOD 2的值是
　　A）1 B）-1 C）3 D）0
　　（16）以下属于合法的QBASIC变量名是
　　A）X-3 B）4y C） n$1 D）b.1
　　（17）定义一个3×3的二维数组，正确的语句是
　　A）DIM a(0 TO 3,0 TO 3) B）DIM a(2000 TO 2002,0 TO 2)
　　C）DIM a(3), a(3) D）DIM a(1 TO 3)
　　（18）下列语句中合法的是
　　A）PRINT a=atn B）PRINT ″SIN(3.14)″+″COS(3.14)″
　　C）PRINT TAB(10)″QB″ D）PRINT USING″####″,1234.56
　　（19）在QBASIC中，下列运算符优先级最高的是
　　A）MOD B）NOT C） / D）＾
　　（20）正确的单行自定义函数语句是
　　A）DEF fn(x)=3.14159*x^2 B）DEFINE fn(x)=3.14159*x^2
　　C）DEF fnn(x)=3.14159*x^2 D）DEF fnn(x)=3.14159*x^2 END
　　（21）表达式 INT(4*RND+1)*(INT(4*RND－1))值的范围是
　　A） [0，8] B）[-1，8] C） [-3，8] D）[- 4，8]
　　（22）有如下程序段
　　CONST C=″Wang″
　　C$=″a″
　　PRINT LEN(C) ;LEN(C$)
　　其输出结果为
　　A）Wang a B）4 1 C）1 1 D）重复定义，程序出错
　　（23）有如下程序段
　　a%=12.8: b!=14.5
　　PRINT a%，b！
　　其输出结果为
　　A）12.8 14 B）12 14.5 C）12.8 15 D）13 14.5
　　（24）有如下程序
　　READ a, b, c
　　RESTORE k
　　READ c, c, d
　　DATA 1, 2
　　k: DATA 3, 4, 5
　　PRINT a; b; c; d
　　END
　　其输出结果为
　　A）1 2 3 4 B）1 2 3 5 C）3 4 5 4 D）1 2 4 5
　　（25）以下语句中错误的是
　　A）INPUT ″x,y=″; a,b B）INPUT ″x,y=″, c,d
　　C）INPUT, ″x,y=″, e,f D）INPUT; ″x,y=″,g,h
　　（26）实现选择结构"如果x 　　A）IF x =y THEN
　　a = -15 a = -15
　　PRINT a ELSE a = 15
　　END IF END IF
　　PRINT a
　　C）IF x〉y THEN a = - 15 D）IF x〉=y THEN GO TO d
　　a = 15 a = 15
　　PRINT a d：a = - 15
　　END PRINT a
　　END
　　（27）以下语句中正确的是
　　A）FOR 1 TO 10 STEP 2 B）FOR x=1, 9 STEP 3
　　C）FOR x = 10 TO -10 STEP -10 D）FOR x = 10 TO 50 NEXT
　　（28）有如下程序
　　DIM k AS INTEGER， y AS INTEGER
　　LET y=3
　　FOR k=1 TO 5 STEP -1
　　y=y+k
　　NEXT k
　　PRINT y；k
　　END
　　其输出结果为
　　A）3 1 B）4 0 C）-1 6 D）4 1

　　（29）有如下程序
　　DIM x AS INTEGER， y AS INTEGER
　　FOR x=1 TO 2
　　FOR y=0 TO x-1
　　PRINT x*y
　　NEXT y
　　NEXT x
　　END
　　内层循环的循环体的总执行次数是
　　A）1 B）2 C）3 D）4
　　（30）有如下程序
　　DIM x AS INTEGER， y AS INTEGER
　　x=0
　　READ y
　　WHILE y〈〉-9999 AND x〈〉3
　　IF y〉x THEN x=y
　　READ y
　　WEND
　　DATA -9999,9,8,3, 9999
　　PRINT ABS(y)
　　END
　　运行后的输出结果为
　　A）9 B）- 9999 C）3 D）9999
　　（31）有如下程序
　　a$ = ″12″
　　b$ = ″24″
　　c$ = b$ + a$
　　d = VAL ( c$ )
　　PRINT d 100
　　END
　　运行后的输出结果是
　　A）12 B）36 C）34 D）24
　　（32）有如下程序
　　FOR j = 1 TO 5
　　a = (a + j ) MOD 5
　　NEXT j
　　PRINT a
　　END
　　运行后的输出结果是
　　A）0 B）5 C）25 D）50
　　（33）当EOF()函数返回的值为-1时，表示文件指针指向文件的
　　A）开头 B）第一个记录 C）末尾 D）最后一个记录
　　（34）有如下程序
　　FOR x = 1 TO 4
　　z = 0
　　FOR y = 1 TO x + 2
　　z = z + 1
　　NEXT y
　　PRINT z;
　　NEXT x
　　END
　　运行后的输出结果是
　　A）3 4 5 6 B）4 5 6 7 C）5 6 7 8 D）6 7 8 9
　　（35）有如下程序
　　DEF fna ( x , y ) = x ^ 2 + y ^ 2
　　x=4
　　y=3
　　PRINT fna ( x , y )
　　END
　　运行后的输出结果是
　　A）5 B）7 C）25 D）49
　　（36）有如下程序
　　m$ = ″ABCDE″
　　MID$ ( m$ , 1 , 5 ) = ″abcde″
　　PRINT m$
　　END
　　运行后的输出结果是
　　A）abcdeABCDE B）ABCDEabcde C）abcde D）ABCDE
　　（37）有如下程序
　　FOR j=1 TO 10
　　READ a
　　IF a MOD 2 = 0 THEN sum = sum + a
　　NEXT j
　　PRINT ″sum = ″ ; sum
　　DATA 1,3,6,10,15,21,28,36,45,55
　　END
　　运行后的输出结果是
　　A）55 B）80 C）140 D）220
　　（38）有如下程序
　　x = 1
　　DO
　　x = 2 * x + 1
　　num = num + 1
　　LOOP UNTIL x 〉 100
　　PRINT num , x
　　END
　　运行后的输出结果是
　　A）6 127 B）8 127 C）127 7 D）127 8
　　（39）有如下程序
　　sum = 0
　　FOR i = 1 TO 9
　　IF i 〈〉 10 THEN
　　sum = sum + 1
　　ELSE
　　sum = sum + 2
　　END IF=版权所有  软件 下载  学院  版权所有=
　　NEXT i
　　PRINT sum
　　END
　　运行后输出结果是
　　A）1 B）9 C）45 D）55
　　（40）有如下程序
　　m$ = "*"
　　i = 1
　　FOR k = 3 TO 1 STEP -1
　　x$ = STRING$ ( k + i, m$ )
　　PRINT x$
　　m$ = m$ + "*"
　　i = - i
　　NEXT k
　　END
　　运行后的输出结果是
　　A)** B)**** C)**** D)****
　　*** *** * **
　　**** ** ** ******
　　 （41）有如下程序
　　DECLARE SUB f(m%,n%,g%)
　　CALL f(87,69,g%)
　　PRINT g%
　　END
　　SUB f(m%,n%,g%)
　　a = m%
　　b = n%
　　DO
　　c = a MOD b
　　a = b
　　b = c
　　LOOP WHILE c 〈〉 0
　　g% = a
　　END SUB
　　运行后的输出结果是
　　A）3 B）18 C）69 D）87
　　（42）有如下程序
　　INPUT n
　　i = 2
　　t = -1
　　DO WHILE i * i 〈= n
　　IF n MOD i = 0 THEN
　　t = 0
　　END IF
　　i = i + 1
　　LOOP
　　PRINT t
　　END
　　运行时输入 257，输出结果是
　　A）0 B）1 C）-1 D）257
　　（43）有如下程序
　　month = INT( RND * 3 + 1 ) + 6
　　SELECT CASE month
　　CASE 1 TO 3
　　season$=″First″
　　CASE 4 TO 6
　　season$=″Second″
　　CASE 7 TO 9
　　season$=″Third″
　　CASE ELSE
　　season$=″Fourth″
　　END SELECT
　　PRINT season$
　　END
　　运行后的输出结果是
　　A）First B）Second C）Third D）不能确定
　　（44）有如下程序
　　DECLARE FUNCTION f(n)
　　INPUT n
　　PRINT f( n )
　　END
　　FUNCTION f(n)
　　IF n = 0 THEN f = 0 ELSE f = n + f(n-1)
　　END FUNCTION
　　键盘输入 n 运行后的输出结果是 78, 则 n 的值是
　　A）10 B）11 C）12 D）13
　　（45）有如下程序
　　CLS: SCREEN 13: COLOR 2
　　x = 180 : y = 100 : r = 50
　　CIRCLE ( x ,y ),50
　　CIRCLE (180,100),r
　　END
　　该程序在屏幕上显示的是
　　A）一个圆 B）两个同心圆 C）两个不同心的圆 D）没有显示
　　（46）有如下程序
　　SCREEN 13
　　COLOR 2
　　LINE (10,10) - (50,50)
　　LINE (50,50) - (10,90)
　　END
　　程序所画两条线段
　　A）关于一点对称 B）关于一条垂直的直线对称
　　C）关于一条水平的直线对称 D）重合
　　（47）有如下程序
　　FOR m = 3 TO 5
　　FOR j = 1 TO m - 2
　　FOR k = j TO 3
　　n = n + k
　　NEXT k
　　NEXT j
　　NEXT m
　　END
　　运行后n的值为
　　A）21 B）25 C）31 D）42
　　（48）有如下程序
　　m$ = "a"
　　n$ = "b"
　　o$ = LCASE$(m$)
　　p$ = UCASE$(n$)
　　PRINT o$; VAL(o$), p$; VAL(p$)
　　END
　　运行结果是
　　A）a 0 B 0 B）A 0 b 0 C）a 97 B 66 D）A 65 b 98
　　（49）语句OPEN ″A.DAT″ FOR RANDOM AS #1 LEN=30 表示此文件每个记录
　　A）长度等于30个字符 B）长度等于30个字节
　　C）长度小于或等于30个字节 D）长度小于或等于30个字符
　　（50）有如下程序
　　DIM x(3, 3)
　　FOR k = 1 TO 2
　　FOR j = 1 TO 2
　　IF k = j THEN
　　x(k, j) = 1
　　ELSE
　　x(k, j) = 0
　　END IF
　　NEXT j：NEXT k
　　OPEN "diagonal.dat" FOR OUTPUT AS #1
　　FOR k = 1 TO 2
　　PRINT #1, x(k, 1); x(k, 2)
　　NEXT k
　　CLOSE #1
　　END
　　执行程序，屏幕上显示的结果是
　　A) 0 1 B) 1 0 C) 0 0 D) 没有任何显示
　　 1 0 　0 1 　　1 1

　　二、填空题（每空2分，共40分）

　　（1）用十六进制给存储器中的字节地址进行编号，若地址编号从0000到FFFF，则该存储器的容量为 【1】 KB。
　　（2）假设在当前盘的当前目录下有两个文件A.TXT和B.TXT，现要将文件B.TXT合并连接到文件A.TXT的后面。若使用COPY命令，则完整的命令为 【2】 。
　　（3）E-mail地址由用户名和域名两部分组成，这两部分的分隔符为 【3】 。
　　（4）假设在当前盘当前目录下有一个可执行程序USER.EXE。现要执行该程序，并要求在执行过程中将显示输出的结果信息存入当前盘当前目录的文件OUT.DAT中，则完整的DOS命令为 【4】 。
　　（5）在DOS环境下，表示打印机的设备文件名为 【5】 。
　　（6）数学式 的QBASIC表达式为 【6】 。
　　（7）常数 -0.00013579的标准化的指数形式是 【7】 。
　　（8）有如下程序
　　a=1357 : b=246
　　c=LEN(str$(a)+str$(b))
　　PRINT c
　　END
　　运行后, 输出的值是 【8】 。
　　(9) 四个字符串"Xab"、"XYZ"、"def"及"dE"中最大者为 【9】 。
　　（10）有如下程序
　　FOR j=1 TO 11
　　j=j+1
　　IF j MOD 4=0 THEN n=n+1
　　NEXT j
　　PRINT ″n=″;n
　　END
　　运行后, 输出的值是 【10】 。
　　（11）有如下程序
　　x=5：y= -20
　　IF NOT x〉0 THEN
　　x=y-3
　　ELSE
　　y=y+3
　　END IF
　　PRINT x－y；y－x
　　END
　　运行后的输出结果是 【11】 。
　　（12）设a=2，b=3，c=4，d=5，表达式 3〉2*b OR a=c AND b〈〉c OR c〉d的值是 【12】 。
　　（13）有如下程序
　　FOR i=1 TO 5
　　FOR x=i TO 5 STEP 1
　　IF i=2 AND x〈5 THEN PRINT ″*″;
　　NEXT x
　　NEXT i
　　END
　　运行后的输出结果是 【13】 。
　　（14）随机生成100个-500至500间的整数（含-500和500），并找出其中第k大的数。请在【14】、【15】处填入适当内容将程序补充完整。
　　DIM a(100)
　　INPUT k
　　FOR i = 1 TO 100
　　a(i)=INT( 【14】 *RND) - 500: PRINT a(i);
　　NEXT i
　　PRINT
　　FOR i = 1 TO k
　　FOR j =i+1 TO 100
　　IF 【15】 THEN SWAP a(i),a(j)
　　NEXT j
　　NEXT i
　　PRINT ″a(″;k;″)=″;a(k);
　　END
　　（15）有如下程序
　　DIM i AS INTEGER，x AS INTEGER
　　x=1: y=1: i=1
　　DO WHILE i〈4
　　f=x+y
　　x=y
　　y=f
　　PRINT f;
　　i=i+1
　　LOOP
　　END
　　运行后的输出结果是 【16】 。
　　（16）有如下程序
　　DIM tel(10) AS STRING * 8
　　FOR i = 1 TO 4
　　READ tel(i)
　　NEXT i
　　FOR i = 1 TO 4
　　IF LEFT$(tel(i), 1) = "2" THEN
　　tel(i) = "6" + tel(i)
　　ELSE
　　tel(i) = tel(i) +"9"
　　END IF
　　NEXT i
　　PRINT tel(1),tel(2)
　　DATA 6543210,2345678,2457788,8237777
　　END
　　运行后的输出结果是 【17】 。
　　（17）下面的程序从键盘输入一个正整数n，计算并输出比n小，并且与n互素的数的个数。（两个数互素是指它们的最大公约数等于1）
　　DECLARE FUNCTION gcd(a,b)
　　INPUT n
　　Phi = 1
　　FOR i = 2 TO n - 1
　　IF gcd(n,i)=1 THEN phi = 【18】
　　NEXT i
　　END
　　FUNCTION gcd(a,b)
　　IF b = 0 THEN
　　tmp = 【19】
　　ELSE
　　IF b = 1 THEN tmp = 1 ELSE tmp = gcd(b, 【20】 )
　　ENDIF
　　gcd = tmp
　　END FUNCTION

　　答案：
　　一、选择题
　　（1）C （2）D （3）D （4）A （5）D
　　（6）B （7）A （8）C （9）D （10）B
　　（11）B （12）C （13）B （14）A （15）A
　　（16）D （17）B （18）B （19）D （20）C
　　（21）D （22）D （23）D （24）D （25）C
　　（26）B （27）C （28）A （29）C （30）D
　　（31）D （32）A （33）C （34）A （35）C
　　（36）C （37）B （38）A （39）B （40）C
　　（41）A （42）C （43）C （44）C （45）A
　　（46）C （47）C （48）A （49）B （50）D
　　二、填空题
　　（1）【1】 64
　　（2）【2】 COPY A.TXT＋B.TXT A.TXT 或 COPY A.TXT＋B.TXT
　　（3）【3】 @
　　（4）【4】 USER 〉OUT.DAT 或 USER 〉〉OUT.DAT
　　或 USER.EXE 〉OUT.DAT 或 USER.EXE 〉〉OUT.DAT
　　（5）【5】 PRN 或 LPT1 或 LPT1: 或 LPT2 或 LPT2:
　　（6）【6】 a*EXP(u*t) *COS(w*t+v)
　　（7）【7】 -1.3579E-4
　　（8）【8】 9
　　（9）【9】 def
　　（10）【10】 3
　　（11）【11】 22 －22
　　（12）【12】 0（或假）=版权所有  软件 下载  学院  版权所有=
　　（13）【13】 ***
　　（14）【14】 1001 【15】a(i) a(i) 或 a(j)〉= a(i)
　　（15）【16】 2 3 5
　　（16）【17】 6543210 62345678
　　（17）【18】 phi +1 【19】a 【20】a MOD