柠檬试题库
search
首页
计算机
公务员
驾照
关于
share
运行如下程序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
热度🔥474
参考答案: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提问
content_copy
content_copy
扫码免费计算机二级刷题
2025年计算机等级考试题库
推荐
有以下定义和语句 struct workers { int num; char name[20]; char c; struct { int day; int month; int year;} s; }; struct workers w,*pw; pw=&w; 能给w中year成员赋1980的语句是
若有以下程序 #include main() { int a=-11, b=10; a /= b /= -4; printf("%d %d\n", a, b); } 则程序的输出结果是
在窗体上画一个名称为Command1的命令按钮,并编写如下程序:Private Type Record ID As Integer Name As String * 20End TypePrivate Sub Command1_Click() Dim MaxSize, NextChar, MyChar Open "d:\temp\female.txt" For Input As #1 MaxSize=LOF(1) For NextChar=MaxSize To 1 Step-1 MyChar=Input(1, #1) Next NextChar Print EOF(1) Close #1End Sub运行程序,单击命令按钮,其输出结果为( )。
组成操作系统的主要部分通常是进程线程管理、内存管理、设备管理和
标签
二级VB程序设计
程序
整除
for
to