首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
运行如下程序 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,
运行如下程序 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,
admin
2020-07-22
62
问题
运行如下程序
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 n
End Sub
n的值是( )。
选项
A、2
B、3
C、4
D、5
答案
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。
转载请注明原文地址:https://kaotiyun.com/show/xRHp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在程序运行时,下面的叙述中正确的是
以下叙述中正确的是()。
有数据定义语句:Dima,bAsIntegerDimx%,YasInteger执行语句后,不是整型变量的是
下列关于顺序文件的描述中,正确的是()。
下面程序运行时,若输入395,则输出结果是PrivateSubCommand1_Click()Dimx%x=InputBox("请输入一个3位整数")PrintxMod10,x\100,(xMod100)\10EndSu
有下面程序代码:OptionBase1PrivateSubCommandl_Click()Dima(10)AsInteger,x,bx=InputBox("请输入一个多砬整数")Fork=1ToLen(x)b=Mid(x,
能够将组合框Combo1中最后一个数据项删除的语句为( )。
以下()不属于对象的基本特征。
某二叉树中度为2的结点有10个,则该二叉树中有()个叶子结点。
在窗体上画一个文本框,名称为Textl(可显示多行),然后再画三个命令按钮,名称分别为Commandl、Command2和Command3,标题分别为”读数”、”统计”和”存盘”,如图2.5所示。程序的其功能是:单击”读数”按钮,则把考生目录下的in5.t
随机试题
请简述柔性的含义。
为下列句子中划线的词释义外面下雨了,好在下得不大,下课你们回宿舍也不会淋湿的。
具有降气祛痰平喘、温肾纳气功效的方是
当工程规模较大或分期建设时,为方便工程施工和验收使用,现场施工控制测量应设()。
在完全竞争的情况下,价格曲线与平均成本曲线相切是()。
小朱担任技术开发部门主管之后,预见到今后5年IT业的技术开发业务会持续增长,他建议董事长派几名年轻技术人员到国外学习新的技术。指示人力资源部进行详细的决策分析之后,董事长最后采纳了他的建议。根据以上资料,回答下列问题:董事长采纳了小朱的建议是因为(
下面所述正确的是()。
()对于四边形相当于整数对于()
蓝星航线上所有货轮的长度都大于100米,该航线上所有客轮的长度都小于100米。蓝星航线上的大多数轮船都是1990年以前下水的。金星航线上的所有货轮和客轮都是1990年以后下水的,其长度都小于100米。大通港一号码头只对上述两条航线的轮船开放,该码头设施只适
Averyimportantworldproblemistheincreasingnumberofpeoplewhoactuallyinhabitthisplanet.Thelimitedamountoflanda
最新回复
(
0
)