首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序: Private Sub Command1_Click() Dim m As Integer.n As Integer m=1:n=0 Do While m<20 n=m+n m=3*m+1 Loop Print m,n End Sub 程序
编写如下程序: Private Sub Command1_Click() Dim m As Integer.n As Integer m=1:n=0 Do While m<20 n=m+n m=3*m+1 Loop Print m,n End Sub 程序
admin
2016-06-23
24
问题
编写如下程序:
Private Sub Command1_Click()
Dim m As Integer.n As Integer
m=1:n=0
Do While m<20
n=m+n
m=3*m+1
Loop
Print m,n
End Sub
程序运行后,单击命令按钮Command1,输出结果为
选项
A、40 18
B、40 19
C、20 64
D、21 64
答案
A
解析
循环中各变量值变化如下:
n=m+n=1+0=1,m=3*m+1=3+1=4,4,小于20继续循环;
n=m+n=4+1=5,m=3*m+1=12+1=13,13,小于20继续循环;
n=m+n=13+5=18,m=3*m+1=39+1=40,40不小于20,循环结束。此时m=40,n=18。
转载请注明原文地址:https://kaotiyun.com/show/lcLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设有如下变量声明语句:Dima,bAsBoolean则下面叙述中正确的是
给定年份,下列程序用来判断该年是否为闰年,请填空。提示:闰年的条件是年份可以被4整除但不能被100整除,或者能被400整除。PrivateSubComand6_Click()DimyAsIntegery=Input
模块独立性是软件模块化所提出的要求,衡量模块独立性的度量标准则是模块的
假定有如下事件过程:PrivateSubForm_MouseDown(BuaonAsInteger,ShiftAsInteger,xAsSingle,y_AsSingle) IfButton=2Then
在窗体上画一个命令按钮(其Name属性为Command1),然后编写如下代码:OptionBase1PrivateSubCommand1_Click()Dima s=0:j=1 a=Array(1,2,
Sub过程与Function过程最根本的区别是
向顺序文件Temp.txt中写入1,2,3这3个数。在程序中加入以下语句的哪一项可以使程序功能完整。PrivateSubCommand1_Click() Open"c:\Temp.txt",OutputAs#1 For
测试的目的是暴露错误,评价程序的可靠性,而______的目的是发现错误的位置并改正错误。
双击窗体中的对象后,VisualBasic将显示的窗口是
随机试题
淬火是使钢材获得马氏体组织的热处理方法。()
下列辅料在软膏中的作用 A.单硬脂酸甘油酯 B.甘油 C.白凡士林 D.十二烷基硫酸钠 E.对羟基苯甲酸乙酯油性基质
某工程双代号网络计划中,工作N两端节点的最早时间和最迟时间如下图所示,则工作N的自由时差为()。
13,22,33,46,61,()。
Accordingtothedictionarydefinitionof"create",ordinarypeoplearecreativeeveryday.Tocreatemeans"tobringintobein
在兴起于20世纪70年代的世界新闻新秩序之争中。发展中国家有哪些基本主张?(南开大学2010年研)
若x1、x2是方程x2一3x+1=0的两个根,则|x1一x2|=()。
已知α=[1,k,1]T是A-1的特征向量,其中求k及α所对应的A的特征值.
有如下类定义:ClassTest{chara;constcharb;public:Test(charc){a=c;b=c;)//第1行voidf(chara)const{this->a=a;}//第2行voidg(charb){
A、Thecarswerefoundtogiveoutgaseshigherthanstandardlevel.B、Thecompanywascreatingcarswhichwerefriendlytoenvir
最新回复
(
0
)