运行如下程序Private Sub Command1_Click() Dim a(5， 5)As Integer For i＝1 To 5 For j＝1 To 4 a(i， j)＝i * 2＋j If a(i， j)/ 7＝a(i， j)\7 Then n＝n＋1 End If Next j Next Print nEnd Subn的值是( )。
- A.2
- B.3
- C.4
- D.5
热度🔥452
参考答案：B
解析：
【解析】VB中"/"是浮点除法运算符，"\"是整数除法运算符，程序中的条件表达式a(i， j)/ 7＝a(i， j)】成立时说明这个数能够被7整除，程序即是统计这个二维数组中能被7整除的数的个数。数组元素值在i＝1时为(3,4,5,6)，i＝2时为(5,6,7,8)，i＝3时为(7,8,9,10)，i＝4时为(9,10,11,12)，i＝5时为(11,12,13,14)，其中能够被7整除的数有7、7、14共3个。因此答案为B。
【解析】VB中"/"是浮点除法运算符，"\"是整数除法运算符，程序中的条件表达式a(i， j)/ 7＝a(i， j)】成立时说明这个数能够被7整除，程序即是统计这个二维数组中能被7整除的数的个数。数组元素值在i＝1时为(3,4,5,6)，i＝2时为(5,6,7,8)，i＝3时为(7,8,9,10)，i＝4时为(9,10,11,12)，i＝5时为(11,12,13,14)，其中能够被7整除的数有7、7、14共3个。因此答案为B。
复制题目向AI提问
扫码免费计算机二级刷题
2025年计算机等级考试题库
推荐
C源程序中不能表示的数制是( )。
在32位编译器上，设有定义
char *str1 = "Hello", str2[] = "Hello"; ，
则以下语句
printf("%d %d", sizeof(str1), sizeof(str2));
的输出结果是
以下程序的功能是随机产生10个两位的整数：Option Base 1Private Sub Command1_Click() Dim a(10)As Integer Dim i As Integer Randomize For i＝1 To 10 a(i)＝Int(Rnd * 100)＋1 Print a(i) Next iEnd Sub运行以上程序，发现有错误，需要对产生随机数的语句进行修改。以下正确的修改是( )。
Cisco 3548交换机采用telnet远程管理方式进行配置，其设备管理地址是222.38.12.23/24，缺省路由是222.38.12.1。下列对交换机预先进行的配置，正确的是（）。
维护过程是维护方所从事的一系列活动。以下不属于维护过程活动的是
