在线现看午夜福利片|女人16久久免费视频|鲁丝片一区鲁丝片二区鲁丝|一区二区三区欧美在线

16.已知數(shù)組A(4,4)各個元素在運行程序10-90語句后被賦值并打印,形成四階方陣,請在110行(16)處填入的需內(nèi)容,使產(chǎn)生一個轉置矩陣(即行列互換),仍放在數(shù)組A中,并打印了出來.
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.下面程序的作用是打開一個隨機文件,讀入20個記錄,并將它們打印出來,請把第60行處補充完整.
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.下面程序運行后輸出的結果是(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.在磁盤A的根目錄中有一個名為BOOK.DAT的文件,內(nèi)容為書店名,英語,物理,數(shù)學三本書的價格,現(xiàn)次此文件再在根目錄中建一個名為AVER.DAT的文件,內(nèi)容為書店名及三本書的平均價格,但程序不完整, (19)處補充之.
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.下面程序運行后輸出結果是BOTTOM,但程序不完整,請在第30行(20)處補充之.
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春季全國計算機等級考試二級筆試試題基礎知識和BASIC語言程序設計(答案及評分標準)
一、選擇題(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)

上一頁  [1] [2] [3] [4] [5] [6]