16.已知數(shù)組A(4,4)各個(gè)元素在運(yùn)行程序10-90語(yǔ)句后被賦值并打印,形成四階方陣,請(qǐng)?jiān)?10行(16)處填入的需內(nèi)容,使產(chǎn)生一個(gè)轉(zhuǎn)置矩陣(即行列互換),仍放在數(shù)組A中,并打印了出來(lái).
10 DIM A(4,4)
20 FOR K=1 TO 4
30 FOR J=1 TO 4
40 A(K,J)=J
50 PRINT A(K,J);
60 NEXT J
70 PRINT
80 NEXT K
90 PRINT
100 FOR K=1 TO 4
110 FOR J=1 TO (16)
120 T=A(J,K)
130 A(J,K)
140 A(K,J)=T
150 NEXT J
160 NEXT K
170 FOR K=1 TO 4
180 PRINT A(K,1);A(K,2);A(K,3);A(K,4)
190 NEXT K
200 END
17.下面程序的作用是打開(kāi)一個(gè)隨機(jī)文件,讀入20個(gè)記錄,并將它們打印出來(lái),請(qǐng)把第60行處補(bǔ)充完整.
10 DIM A(20)
20 OPEN "ABC.DAT" AS#1 LEN=8
30 FIELD # 1,8 AS D$
40 R%=1
50 FOR M=1 TO 20
60 (17),R%:A(M)=CVD(D$):R%=R%+1
70 NEXT M
80 CLOSE # 1
90 FOR M=1 TO 20
100 PRINT A(M)
110 NEXT M
120 END
18.下面程序運(yùn)行后輸出的結(jié)果是(18).
10 C$=" "
20 FOR J=1 TO 4
30 READ A$
40 C$=C$+LEFT$(A$,J)
50 NEXT J
60 PRINT C$
70 DATA UNITE,NIGHT,VERSION,SITYARD
80 END
19.在磁盤(pán)A的根目錄中有一個(gè)名為BOOK.DAT的文件,內(nèi)容為書(shū)店名,英語(yǔ),物理,數(shù)學(xué)三本書(shū)的價(jià)格,現(xiàn)次此文件再在根目錄中建一個(gè)名為AVER.DAT的文件,內(nèi)容為書(shū)店名及三本書(shū)的平均價(jià)格,但程序不完整, (19)處補(bǔ)充之.
10 OPEN "A:BOOD.DAT" FOR INPUT AS #3
20 OPEN "A:AVER.DAT" FOR OUTPUT AS #2
30 WHILE NOT EOF(3)
40 INPUT #3,NA$,ENG,PHY,MATH
50 WRITE #2,NA$,(19)
60 WEND
70 CLOSE #3,#2
80 END
20.下面程序運(yùn)行后輸出結(jié)果是BOTTOM,但程序不完整,請(qǐng)?jiān)诘?0行(20)處補(bǔ)充之.
10 FOR J=1 TO 3
20 READ A$
30 A$=(20)
40 C$=C$+A$
50 NEXT J
60 PRINT C$
70 DATA BALL,BOTH,ARTOMAT
80 END
1997春季全國(guó)計(jì)算機(jī)等級(jí)考試二級(jí)筆試試題基礎(chǔ)知識(shí)和BASIC語(yǔ)言程序設(shè)計(jì)(答案及評(píng)分標(biāo)準(zhǔn))
一、選擇題(1-40題每題1分,41-50題每題2分,共60分)
1.B 2.B 3.C 4.A 5.C 6.B 7.B 8.B 9.C 10.C
11.D 12.D 13.C 14.D 15.B 16.D 17.C 18.A 19.C 20.D
21.D 22.C 23.D 24.A 25.D 26.A 27.A 28.A 29.B 30.D
31.A 32.B 33.B 34.C 35.C 36.B 37.B 38.A 39.C 40.D
41.C 42.C 43.C 44.A 45.C 46.C 47.D 48.B 49.C 50.D
二、填空題(每空2分,共40分)
1.[1] 70.6上 2.[2] 25
3.[3] 57 4.[4] 外部
5.[5] AUTOEXEC.BAT 6.[6] 0
7.[7] 2*LN(X)*SIN(2*Y)+ATN(4*Z)*COS(5*W) 8.[8] 雙精度
9.[9] 20 10.[10] 80
11.[11] 9 12.[12] ARE IS 120
ARE IS 330
13.[13] 45 14.[14] K=5
15.[15] LEN(A$) 16.[16] 4
17.[17] GET #1 18.[18] UNIVERSITY
19.[19] (ENG+PHY+MATH)/3 20.[20] MID(A$,J,J)