VB编程题:统计7*7数组四周元素之和及四周元素中能够被7整除的元素的个数,并在标签中显示.Sum = 0For i = 1 To 7Sum = Sum + a(1,i)Next iFor i = 1 To 7Sum = Sum + a(7,i)Next iFor i = 2 To 6Sum = Sum + a(i,1)Next iFor i =

来源:学生作业帮助网 编辑:作业帮 时间:2024/11/30 12:03:09
VB编程题:统计7*7数组四周元素之和及四周元素中能够被7整除的元素的个数,并在标签中显示.Sum = 0For i = 1 To 7Sum = Sum + a(1,i)Next iFor i = 1 To 7Sum = Sum + a(7,i)Next iFor i = 2 To 6Sum = Sum + a(i,1)Next iFor i =
xT]oA+ $~5A_NeЅ&>REiĖ]MPivv'wvȆF/{gιsϙç3n~( ` T.\m&qnvл,8IPFK-| 0PG6),qKw-Xp7QNí9-u.pKW/4%̠nQm'J=Nw5'XS2ICb6C^]$̐BeiX"q),3'S_@sQ2鱲hr-ΪI@ ԃ˶^-IX|*F~ Cowc_(/O%s `?9c4Ʀ~{?avPްШ#h L`3fs6'ꑡ%AYTh4(Uz5?ƀC-qCA:J@:VʉeT1,dT2|' {g %6 wF蟀BЈ)n/IjB/+V*h^wOn ĝHLVSNDTc죃 ;

VB编程题:统计7*7数组四周元素之和及四周元素中能够被7整除的元素的个数,并在标签中显示.Sum = 0For i = 1 To 7Sum = Sum + a(1,i)Next iFor i = 1 To 7Sum = Sum + a(7,i)Next iFor i = 2 To 6Sum = Sum + a(i,1)Next iFor i =
VB编程题:统计7*7数组四周元素之和及四周元素中能够被7整除的元素的个数,并在标签中显示.
Sum = 0
For i = 1 To 7
Sum = Sum + a(1,i)
Next i
For i = 1 To 7
Sum = Sum + a(7,i)
Next i
For i = 2 To 6
Sum = Sum + a(i,1)
Next i
For i = 2 To 6
Sum = Sum + a(i,7)
Next i
lblSecond.Caption = Sum
n = 0
For i = 1 To 7
If a(1,i) Mod 7 = 0 Then
n = n + 1
ElseIf a(7,i) Mod 7 = 0 Then
n = n + 1
End If
Next i
For i = 2 To 6
If a(i,1) Mod 7 = 0 Then
n = n + 1
ElseIf a(i,7) Mod 7 = 0 Then
n = n + 1
End If
Next i
lblFirst.Caption = n
Dim i As Integer,n As Integer
For i = 1 To 7
If a(i,1) Mod 7 = 0 Then
n = n + 1
ElseIf a(1,i) Mod 7 = 0 Then
n = n + 1
ElseIf a(7,i) Mod 7 = 0 Then
n = n + 1
ElseIf a(i,7) Mod 7 = 0 Then
n = n + 1
End If
Next i
lblFirst = n
For i = 1 To 7
sum = sum + a(1,i) + a(i,1) + a(7,i) + a(i,7)
Next
sum = sum - a(1,7) - a(1,7) - a(7,1) - a(7,7)
lblSecond = sum
我觉得应该一样啊可是运行出来不对呢

VB编程题:统计7*7数组四周元素之和及四周元素中能够被7整除的元素的个数,并在标签中显示.Sum = 0For i = 1 To 7Sum = Sum + a(1,i)Next iFor i = 1 To 7Sum = Sum + a(7,i)Next iFor i = 2 To 6Sum = Sum + a(i,1)Next iFor i =
你的与标准的确实有区别.计算和的基本上是一样的.但是求被7整除的数的个数,这两段都是求的“不完全个数”,他们之间还有些不同,但均不是题目中要求的东西.
结论:你的答案和标准答案均是错误的.

统计7*7数组四周元素之和及四周元素中能被7整除的元素个数 统计7*7数组四周元素之和及四周元素中能被7整除的元素个数 VB编程题:统计7*7数组四周元素之和及四周元素中能够被7整除的元素的个数,并在标签中显示.Sum = 0For i = 1 To 7Sum = Sum + a(1,i)Next iFor i = 1 To 7Sum = Sum + a(7,i)Next iFor i = 2 To 6Sum = Sum + a(i,1)Next iFor i = 1.VB编程,求一个M行N列的矩阵四周元素之和,元素值可以随机产生,M、 N从键盘输入2.将从键盘上输入的一个数插入到数组的指定位置提示:在数组中插入的元素的过程是(1)输入插入的位置及 vb编程求下列矩阵主对角线上的元素之和.1 2 3 4 5 6 7 8 9 vb编程n以内5或7的倍数之和,编程统计1~n之内是3的倍数或7的倍数的个数 vb编程n以内5或7的倍数之和,还有编程统计1~n之内是3的倍数或7的倍数的个数,下面是两个程序的图片截图,拜托编成像图片 编程计算一个二维数组矩阵对角线元素之和 用VB编程:随机产生10个0~100之间的随机整数,存放在一个数组中,然后求个元素和、平均值,统计大于平均值的元素个数并把它们显示出来. VB编程:设有如下两组数据VB编程:设有如下两组数据A:2,7,7,6,27,70,25B:79,27,32,41,57,66,70编写一个程序,把上面两组数据分别读入两个数组中,然后把两个数组中对应下标的元素相加,即2+79,7+27,.,25+ c语言编程题 please...please...please...1、编程实现,求表达式:1+3+5+7…….前20项之和2、输出100到200之间的所有素数,要求每行10个数据3、有一整形数组,键盘输入数据,求数组元素的最大值、最小值 有一个5*5数组,编程求其元素矩阵中对角线元素之和 是道C语言编程题,读入20个整数,统计非负数个数,并计算非负数之和用数组 大学VB编程题:将两位正整数中所有的素数以每行4个进行输出,统计并输出素数之和. 输入一个M行M列的二维数组,计算四周元素之和 随机生成4*4的数组,数组元素的取范围是[10,99]之间的整数,计算二维数组主对角线元素之和.编程 用VB编程,统计1~100中满足3的倍数,7的倍数的数各为多少? VB 求10个元素所构成108个元素个位数最大值,最小值,平均值统计低于平均值且元素之和 C语言的作业题1、 编程实现二维数组中2条对角线元素之和.如下图所示.1 2 3 45 6 7 89 10 11 1213 14 15 15