绗?/p>
7
绔?/p>
涔犻涓庣瓟妗?/p>
涓銆?/p>
閫夋嫨棰?/p>
1.
濡備笅鏁扮粍澹版槑璇彞锛屾纭殑鏄?/p>
锛?/p>
A
锛?/p>
Dim a[3,4]As Integer
锛?/p>
B
锛?/p>
Dim a(3,4)As Integer
锛?/p>
C
锛?/p>
Dim a(n,n) As Integer
锛?/p>
D
锛?/p>
Dim a(3,4)As Integer
2.
瑕佸垎閰嶅瓨鏀惧涓嬫柟闃电殑鏁版嵁锛?/p>
1.1 2.2 3.3
4.4 5.5 6.6
7.7 8.8 9.9
鏁扮粍澹版槑璇彞鑳藉疄鐜帮紙涓嶈兘娴垂绌洪棿锛夌殑鏄?/p>
(A) Dim a(9) As Single
锛?/p>
B
锛?/p>
Dim a(3,3) As Single
锛?/p>
C
锛?/p>
Dim a (-1 To 1,-5 To -3) As Single
锛?/p>
D
锛?/p>
Dim a (-3 To 1,-5 To 7) As Integer
3.
濡備笅鏁扮粍澹版槑璇彞锛?/p>
Dim a(3,-2 To 2,5)
鍒欐暟缁?/p>
a
鍖呭惈鐨勫厓绱犵殑涓暟涓?/p>
锛?/p>
A
锛?/p>
120
锛?/p>
B
锛?/p>
75
锛?/p>
C
锛?/p>
60
锛?/p>
D
锛?/p>
13
4.
浠ヤ笅绋嬪簭
Dim a
a=Array(1,2,3,4,5,6,7)
For i=Lbound (a) To Ubound (a)
a(i)=a(i)*a(i)
Next i