在窗体上画两个命令按钮,名称分别为Command1、Command2,并编写如下程序 Const n=5,m=4 Dim a(m,n) Private Sub Command1_Click() k=1

admin2009-03-17  22

问题 在窗体上画两个命令按钮,名称分别为Command1、Command2,并编写如下程序     Const n=5,m=4     Dim a(m,n)     Private Sub Command1_Click()          k=1          For i=1 To m               Forj=1 To n                   a(i,j)=k                   k=k+1               Next j          Next i     End Sub     Private Sub Command2_Click()          summ=0          For i=1 Tom               For j=1 To n                    If i=1 Or i=m Then                        summ=summ+a(i,j)                    Else                        If j=1 Or j=n Then                            summ=summ+a(i,j)                        End If                    End If               Next j          Next i          Print summ     End Sub     过程Command1 Click()的作用是在二锥数组a中存放—个m行n列的矩阵;过程Command2 Click()的作用是______。

选项 A、计算矩阵外围一圈元素的累加和
B、计算矩外围一圈以外的所有元素的累加和
C、计算矩阵第1列和最后—列元素的累加和
D、计算矩阵第1行和最后—行元素的累加和

答案A

解析 过程Command2_Click()中用了一个If语句的嵌套,If语句的条件是第1行或第n行或第1列或第n列,所以说是计算矩阵外围一圈元素的累加和。
转载请注明原文地址:https://kaotiyun.com/show/fj1p777K
0

最新回复(0)