[填空題] 執(zhí)行下面程序,單擊Command1,數(shù)組元素a(3,2)的值是(),a(1,2)的值是(),a(2,3)的值是()Option ExplicitOp
2021-07-20
[填空題] 執(zhí)行下面程序,單擊Command1,數(shù)組元素a(3,2)的值是(),a(1,2)的值是(),a(2,3)的值是()Option ExplicitOption Base 1Private Sub Commandl_Click()Dim n As Integer,i As Integer,j As IntegerDim a(3,3)As Integer,k As Integern=3:k=1i=n:j=(n+1)/2a(i,j)=kFor k=2 To n*ni=i+1:j=j+1If i>n And jn Thenj=1ElseIf i>n And j>n Theni=i-2:j=j-1ElseIf i0 Theni=i-2:j=j-1End Ifa(i,j)=kNext kFor i=1 To nFor j=1 To nPic1.Print Right(" " &Str(a(i,j)),3);Next jPic1.PrintNext iEnd Sub
正確答案:1;9;7
詞條內(nèi)容僅供參考,如果您需要解決具體問題
(尤其在法律、醫(yī)學等領域),建議您咨詢相關領域?qū)I(yè)人士。