黄色在线观看视频-黄色在线免费看-黄色在线视频免费-黄色在线视频免费看-免费啪啪网-免费啪啪网站

一、選擇題（（1）~（40）題每題1分，（41）~（50）題每題2分，共60分）
下列各題A）、B）、C）、D）四個選項中，只有一個答案是正確的。請將正確選項填涂在答題卡相應位置上，答在試卷上不得分。

（1）在計算機中，一個字節所包含二進制位的個數是
A）2 B）4 C）8 D）16

（2）在多媒體計算機中，CD-ROM屬于
A）存儲媒體 B）傳輸媒體 C）表現媒體 D）表示媒體

（3）在DOS系統中，帶有通配符的文件名*.*表示
A）硬盤上的全部文件 B）當前盤當前目錄中的全部文件
C）當前盤上的全部文件 D）根目錄中的全部文件

（4）十六進制數100轉換為十進制數為
A）256 B）512 C）1024 D）64

（5）能將高級語言編寫的源程序轉換為目標程序的軟件是
A）匯編程序 B）編輯程序 C）解釋程序 D）編譯程序

（6）在Internet中，用于在計算機之間傳輸文件的協議是
A）TELNET B）BBS C）FTP D）WWW

（7）在Windows環境下，資源管理器左窗口中的某文件夾左邊標有"＋"標記表示
A）該文件夾為空 B）該文件夾中含有子文件夾
C）該文件夾中只包含有可執行文件 D）該文件夾中包含系統文件

（8）在Windows環境下，下列敘述中正確的是
A）在"開始"菜單中可以增加項目，也可以刪除項目
B）?quot;開始"菜單中不能增加項目，也不能刪除項目
C）在"開始"菜單中可以增加項目，但不能刪除項目
D）在"開始"菜單中不能增加項目，但可以刪除項目

（9）從Windows環境進入DOS方式后，返回Windows環境的命令為
A）QUIT B）WIN C）EXIT D）ESC

（10）下列敘述中正確的是
A）計算機病毒只感染可執行文件
B）計算機病毒只感染文本文件
C）計算機病毒只能通過軟件復制的方式進行傳播
D）計算機病毒可以通過讀寫磁盤或網絡等方式進行傳播

（11）按QBASIC的規定，以下正確的字符型常量是
A）ABCD B）NO(3) C）"SQR(2) " D）N$

（12）下面表達式中，運算結果與其它三個不同的是
A）EXP(-3.5) B）INT(-3.5)+0.5 C）-ABS(-3.5) D）FIX(-3.5)-0.5

（13） 在 QBASIC 語言中，打開一個已有的文件，應使用菜單File下的命令
A）New B）Open C）Save D）Exit

（14）下面各組語句中，非執行語句有
A）LET,INPUT B）PRINT,END
C）DIM,READ D）REM,DATA

（15）語句PRINT "SGN(-26)= "; SGN(-26)的輸出結果是
A）SGN(-26)=26 B）SGN(-26)= -26 C）SGN(-26)=1 D）SGN(-26)= -1

（16）下面四個字符串中，哪個可作為 QBASIC 語言中的變量名
A）fnabc B）abc.def C）gh-kl D）123abc

（17）在 QBASIC 語言中，表達式y1+z2=a*SIN(b*x+c)+k是
A）算術表達式 B）關系表達式 C）邏輯表達式 D）錯誤表達式
（18）當a = 4，b = 7時，語句PRINT a - b= -3輸出的結果是
A）－1 B）0 C）-3 D）4

（19）下列程序運行后輸出的結果是
FOR j = 1 TO 20 STEP 2
a = a + j MOD 5
NEXT j
PRINT a
END
A）20 B）30 C）40 D）100

（20）下列程序運行后輸出的結果是
a = 3: b = -5
c=a: a=b: b=c
PRINT b, a
END
A）-5 3 B）3 3 C）-5 -5 D）3 -5

（21）abc# 表示的變量類型是
A）字符型 B）整型 C）長整型 D）雙精度型

（22）下面不正確的語句是
　 A）READ a,b,c$ B）READ a,b,c$
DATA 1,2,3 DATA 1%,2%,3&
C）READ a,b,c$ D）READ a,b,c$
DATA 1+2,2,"3" DATA 1,2,"a=1b=2",3

（23）下列程序運行后輸出的結果是
k=1
IF k<=1 THEN a=2*k
IF k<=2 THEN a=2*k+1
IF k<=3 THEN a=k
PRINT k；a
END
A） 1 2 B）1 3 C） 1 1 D） 3 1
（24）下列程序運行后輸出的結果是
aa$="11.1" : bb$="22.2" : cc$="C"
dd=VAL(aa$)+VAL(bb$)
ee$=STR$(dd)
PRINT cc$+ee$
END
A）C 11.1 B）C 33.3 C）C 11.122 D）C 11.1+22.2

（25）下列程序運行后輸出的結果是
FOR j=1 TO 10
READ x
IF x<0 THEN a=a+ABS(x)
NEXT j
PRINT a
DATA 1，-2，3，-4，5，-6，7，-8，9，-10
END
A）-25 B）25 C）-30 D）30

（26）下列程序運行后輸出的結果是
a$="A" : b=12.89 : c$="C"
d$=a$+STR$(b)+c$
PRINT LEN(d$)
END
A）6 B）7 C）8 D）9

（27）以下正確的變量類型說明語句是
A）DIM x AS INT B）DIM a$ AS STRING
C）DEFLONG x D）DEFINT a,s-y

（28）下列程序運行后輸出的結果是
sum=0
FOR j=1 TO 10
IF j=10 THEN
EXIT FOR
ELSE
sum=sum+j
END IF
NEXT j
PRINT sum
END
A）45 B）55 C）10 D）36

（29）下列程序運行后的輸出結果是
DO
READ a,b,c
a=a-b
LOOP UNTIL a=-1 AND c=1
PRINT a; b; c
DATA 9,2,3,8,9,1,1,5,1,7,1,1
END
A）8 9 1 B）4 1 1
C）-1 9 1 D）9 2 3

（30）下列程序運行后的輸出結果是
FOR x=1 TO 2
a=0
FOR y=1 TO x+1
a=a+1
NEXT y
PRINT a;
NEXT x
END
A） 1 1 B） 0 0 C） 1 2 D） 2 3

（31）有如下程序
INPUT "Enter a value of a : " ; a
SELECT CASE b
CASE IS >2
b = a+1
CASE IS >3
b = a + 2
CASE IS < 5
b = b + 3
CASE ELSE
b = b + 4
END SELECT
PRINT a ; b
END
運行時，從鍵盤輸入4，輸出的結果是
A） 4 5 B）4 6 C） 4 3 D） 4 4

（32）語句 DIM b(-2 TO4 ,3 TO 7) AS INTEGER 定義的數組元素個數為
A）8 B）24 C）35 D）28

（33）分別對四個字符串賦值：
a$= MID$("12345",2,4):b$= SPACE$(3):c$=UCASE$("ChiNa"):d$=STRING$(3,"= ")
其中變量值最小的為：
A） a$ B） b$ C） c$ D） d$

（34）下列程序運行后輸出的結果是
FOR j = 1 TO 3
FOR k = 1 TO 3
arr(j, k) = (j - 1) * 3 + k
NEXT k
NEXT j
FOR j = 1 TO 3
FOR k = j TO 3
PRINT TAB(k * 3); arr(j, k);
NEXT k: PRINT
NEXT j
END

（35）程序是計算1*3 +5*7+9*11+13*15+……+97*99,請在【35】處將程序補充完整。
FOR j = 1 TO 99 STEP 4
sum = sum + j * (【35】)
NEXT j
PRINT "sum="; sum
END
A）j+1 B）j+2 C）j+3 D）j+4

（36）程序是打印出1000以內的所有素數,并統計出它們的個數。請在【36】處將程序補充完整。
FOR j=2 TO 1000
x = 0: k = 2
DO WHILE k <= SQR(j) AND x = 0
IF j MOD k = 0 THEN x = 1
k = k + 1
LOOP
IF x = 【36】 THEN y = y + 1: PRINT j;
NEXT j
PRINT y
END
A）0 B）1 C）k D）j

（37）下列程序運行后輸出的結果是【37】
FOR j = 2 TO 15 STEP 3
k = k + j
NEXT j
PRINT k + j
END
A）16 B）40 C）55 D）57

（38）下列程序計算sum=1+(1+3)+(1+3+5)+…+(1+3+5+7+…+39)，請在【38】處將程序補充完整。
m = 1: sum = 0: t = 0
DO WHILE m <= 39
t = t + m
sum = sum +【38】
m = m + 2
LOOP
PRINT "sum="; sum
END
A） 1 B）m C） t D） m+2

（39）下列程序運行后輸出的結果是
a$=""
FOR j=1 TO 3
READ b$
a$=a$+RIGHT$(b$,j)
NEXT j
PRINT a$
DATA am,set,meter
END
A）asm B）mtr C） metter D）amsetmeter

（40）下列程序運行后輸出的結果是
a$ = "AB": b$ = "BC": c$ = "CA"
FOR j = 1 TO 2
a$ = b$: b$ = c$: c$ = a$
NEXT j
PRINT a$ + b$ + c$
END
A）BCCAAB B）CAABBC C）BCCABC D）CABCCA

（41）下列程序是從鍵盤上輸入二個數，輸出它們的最大公約數，請在【41】處將程序補充完整。
INPUT "X,Y="; x, y
DO WHILE x【41】y
IF x > y THEN x = x - y ELSE y = y - x
LOOP
PRINT "H.C.F. -- "; x
END
A） > B） = C） <> D） <

（42）程序的功能是：從鍵盤輸入一個數，輸出這個數的平方根，請在【42】處將程序補充完整。
INPUT "n="; n
m = 1: x = 1
DO WHILE ABS(n - x * x) > .001
IF x * x > n THEN x = x【42】: m = m * .1
x = x + m
LOOP
PRINT x; " is the square root of number "; n; "."
END
A） +1 B） -1 C） +m D）-m

（43）下列程序從鍵盤輸入4后，運行輸出的結果是
DECLARE FUNCTION yy (y)
INPUT "n="; n
ee = yy(yy(n))
PRINT ee
END
FUNCTION yy (y)
IF y < 20 THEN y = y + 20
yy = y
END FUNCTION
A） 16 B）17 C） 36 D）24

（44）有如下程序段
FUNCTION myfun(x)
IF x<=1 THEN
tmp=1
ELSE
tmp=myfun(x-1)*2
END IF
myfun=tmp
END FUNCTION
以參數10調用此函數的返回的值為
A）1024 B）512 C） 20 D） 不停止

（45）輸入一個字符串，刪去第三、第六、第九、…位置上的字符，得到一個新字符串，請在【45】處將程序補充完整。
INPUT "Input a string "; aa$
FOR j = 1 TO LEN(aa$) STEP 【45】
bb$ = MID$(aa$, j, 2)
cc$ = cc$ + bb$
NEXT j
PRINT "The old string is "; aa$
PRINT "The new string is "; cc$
END
A） 2 B） 3 C） 4 D） 5

（46）下列程序運行后輸出的結果是
DEFSTR x-z
xx = "12": yy = "34"
zz = STR$(ASC(xx)) + STR$(ASC(yy))
ww = VAL(zz)
PRINT ww
END
A）120 B）241 C）361 D）4951

（47）下列程序運行后，顯示在屏幕上的是
CLS
SCREEN 9: COLOR 3
LINE (50, 20)-(500, 300), 4, B
LINE (500, 20)-(50, 300), 0, B
END
A） 一個矩形 B） 二個不同顏色的矩形
C） 無任何顯示 D） 顯示錯誤信息

（48）下列程序運行后輸出的結果是
WHILE j<30
j=j*j+1
n=n+1
WEND
PRINT n
END
A）0 B） 5 C） 30 D）4
（49）（50）下列程序的功能是：隨機產生100個1到100之間的整數，在其中查找某個數，并輸出其所在位置。請在【49】【50】處將程序補充完整。
DECLARE FUNCTION search(a(),n,x)
DIM a(100)
FOR j=0 TO 99
a(j)=【49】
NEXT j
INPUT x
k=search(a(),100,x)
IF k<>-1 THEN
PRINT "found "; x; " at first position "; k
ELSE
PRINT "Not found "; x
END IF
END

FUNCTION search(a(),n,x)
j=0
DO WHILE 【50】
j=j+1
LOOP
IF j>=n THEN j=-1
search=j
END FUNCTION

（49）A） INT(1+RND*100) B） INT(RND*100)
C）1+RND*100 D）RND*99+1
（50）A） a(j)=x AND j<n B）a(j)<>x AND j<n
C） a(j)>x ANDj<n D）a(j)<x AND j<n

二、填空題（每空2分，共40分）
請將每空的正確答案寫在答題卡【1】～【20】序號的橫線上，答在試卷上不得分。

（1）計算機軟件分為系統軟件與應用軟件，UNIX屬于 【1】 。

（2）假設在當前盤的當前目錄下有兩個文件A.TXT和B.TXT，現要將文件B.TXT合并連接到文件A.TXT的后面。若使用TYPE命令，則完整的命令為 【2】 。

（3）Internet的信息服務方式分為基本服務和擴展服務，電子郵件屬于 【3】 。

（4）在Windows環境下，利用菜單命令刪除固定硬盤上的文件與文件夾，實際上是將需要刪除的文件與文件夾移動到 【4】 文件夾中。

（5）在Windows環境下，為了進行"添加/刪除程序"操作，首先打開 【5】 ，然后雙擊其中的相應圖標。

（6） 計算 43\6 MOD (1 - 3 ^ 2) 的值是 【6】 。

（7） 在 A 驅動器磁盤當前目錄中有一通訊錄文件 a.dat (內容為姓名na$、地址add$)，程序功能是為每個記錄加上電話號碼，請在 【7】 處將程序補充完整。
OPEN "a: a.dat" FOR INPUT AS #1
OPEN "a: b.dat" FOR OUTPUT AS #2
WHILE NOT 【7】
INPUT #1, na$, add$
INPUT "Input the telephone number -- "; tel$
WRITE #2, na$, add$, tel$
WEND
CLOSE
KILL "a:a.dat"
NAME "a:b.dat" AS "a:a.dat"
END

（8）下列程序運行后輸出的結果是 【8】 。
DEF fnabc(x)=x * x + 1
y = fnabc(fnabc(2))
PRINT y
END

（9）下列程序運行后的輸出結果是 【9】 。
DECLARE SUB add (x, y)
x = 1: y = 1
CALL add((x), y)
PRINT x, y
END

SUB add (x, y)
x = x+y
y=2*x
END SUB

（10）下列程序的功能是畫一條正弦曲線，請在【10】處將程序補充完整。
DEF fncsin (z) = 180 * SIN(z) + 200
SCREEN 12
LINE (0, 200)-(628, 200), 13
FOR j = 1 TO 628
【10】 (j, fncsin(j / 50)), 13
NEXT
END

（11）下列程序運行后輸出的結果是 【11】 。
k = 5
FOR j = 3 TO 7 STEP -1
k = k + j
NEXT j
PRINT k + j
END

（12）下列程序運行后輸出是：
1 2 3 4
8 7 6 5
9 10 11 12
16 15 14 13
請在【12】處將程序補充完整。
FOR a = 1 TO 4
FOR b = 1 TO 4
IF a / 2 = a \ 2 THEN
PRINT TAB(4 * b); 4 * a + 1 - b;
ELSE
PRINT TAB(4 * b); 4 * ( 【12】 ) + b;
END IF
NEXT
PRINT
NEXT
END

（13）從鍵盤上輸入一個數n，插入到已經從小到大排列的有序數組中，使該數組仍為有序。請在 【13】 處將程序補充完整。
DIM aa(13)
FOR j = 1 TO 12: READ aa(j): PRINT aa(j); : NEXT j: PRINT
INPUT "n=";aa(13)
j = 12
DO WHILE aa(j) >aa(j+1) AND j> 0
【13】 : j = j - 1
LOOP
FOR k = 1 TO 13: PRINT aa(k); : NEXT: PRINT
DATA 8,25,46,61,89,96,113,132,147,199,201,267
END

（14）下列程序的功能是：隨機生成10個整數，分別計算其中偶數的和及奇數的和。請在【14】、【15】處將程序補充完整（程序中evensum代表偶數之和，oddsum代表奇數之和）。
evensum=0：oddsum=0
FOR j=1 TO 10
x=INT(RND*100)
IF x MOD 【14】 THEN
【15】
ELSE
oddsum=oddsum+x
END IF
NEXT j
PRINT evensum, oddsum
END

（15）從鍵盤上讀入三個整數，判斷是否為勾股數（即其中一個數的平方等于另外兩個數平方的和）。
INPUT a,b,c
IF a>c THEN SWAP a,c
IF b>c THEN 【16】
IF 【17】 THEN PRINT "YES" ELSE PRINT "NO"
END

（16）下列程序的功能是：輸入若干個學生成績(成績為負數時結束)，統計平均成績，并將低于平均成績的成績輸出。
DIM a(20)
n=0
DO
INPUT a(n)
n=n+1
LOOP WHILE 【18】
n=n-1: sum=0
FOR j=0 TO n-1
sum=sum+a(j)
NEXT j
avg=sum/ 【19】
FOR j=0 TO n-1
IF 【20】 THEN PRINT a(j)
NEXT
END

答案

一、選擇題
（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(j) 或 a(i)<=a(j) 或 a(j)> a(i) 或 a(j)>= a(i)
（15）【16】 2 3 5
（16）【17】 6543210 62345678
（17）【18】 phi +1 【19】a 【20】a MOD b