首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序: Private Sub Command1_Click() Dim i As Integer, j As Integer n=InputBox("输入一个大于1的正整数") For i=2 To n For j=2 To
编写如下程序: Private Sub Command1_Click() Dim i As Integer, j As Integer n=InputBox("输入一个大于1的正整数") For i=2 To n For j=2 To
admin
2020-06-30
56
问题
编写如下程序:
Private Sub Command1_Click()
Dim i As Integer, j As Integer
n=InputBox("输入一个大于1的正整数")
For i=2 To n
For j=2 To Sqr(i)
If i Mod j=0 Then Exit For
Next j
If j>Sqr(i)Then Print i
Next i
End Sub
该程序的功能是( )。
选项
A、判断n是否为素数
B、输出n以内所有的奇数
C、输出n以内所有的偶数
D、输出n以内所有的素数
答案
D
解析
假设输入2、4、9进行验证,输入2时程序会输出2,输入4时,程序会输出2、3,可见程序不是判断n是否为素数,所以A不对。由前面验证可知,程序也不是输出n以内的所以奇数或偶数,所以B、C也不对。如果输入9时,程序会输出2、3、5、7,说明程序是输出n以内的所有素数,所以D正确。
转载请注明原文地址:https://kaotiyun.com/show/WbHp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)请在名称为Form1的窗体上建立一个二级下拉菜单,第一级共有两个菜单项,标题分别为“文件”、“编辑”,名称分别为file、edit;在“编辑”菜单下有第二级菜单,
(1)在考生文件夹下有一个工程文件sjt3.vbp,相应的窗体文件为sjt3.frm。其功能是产生0个0~1000的随机整数,放入一个数组中,然后输出这20个整数中小于500的所有整数之和。程序运行后,单击命令按钮(名称为Command1,标题为“输
在窗体上建立三个菜单项(名称分别为Read、Calc和Save,标题分别为“读入数据”、“计算并输出”和“存盘”),然后画一个文本框(名称为Text1,MultiLine属性设置为True,ScrollBars属性设置为2)(如图1-272所示)。程序运
下面关于VB应用程序的叙述中正确的是
有两个关系R,S如下,由关系R和S通过运算得到关系T,则所使用的操作为
下面函数的功能应该是:删除字符串str中所有与变量ch相同的字符,并返回删除后的结果。例如:若str=“ABCDABCD”,ch=“B”,则函数的返回值为:“ACDACD”Functiondelchar(strAsString,chAsStri
编写如下程序:PrivateSubCommand1_Click() DimxAsInteger,yAsInteger x=InputBox("输入第一个数") y=InputBox("输入第二个数") Callf(x,
在E-R图中,用来表示实体联系的图形是( )。
一个运动队有多个队员,一个队员仅属于一个运动队,一个队一般都有一个教练,则实体运动队和队员的联系是
深度为5的完全二叉树的结点数不可能是()。
随机试题
我国酿制纯酒汁的酒是从商代开始的。()
Mostpeopledon’tthinkaboutbackinguptheircomputeruntiltheyexperiencethedreadofaharddrivecrash.It’sonlythenth
患者,男,70岁。突然心律不齐,持续1天,心率140次/分,节律不齐,心电图示“房颤”。治疗首先选
A、截疟B、行气C、温中D、解暑E、消积佩兰的功效是()。
国家计委颁布的《工程咨询单位持证执业管理暂行办法》规定,工程咨询单位必须以()为执业依据。
国产非标准设备原价的计算方法有()。
注册会计师若因舞弊无法继续执行审计业务会考虑解除业务约定,属于影响其得出结论的因素有()。
下列饼图中,阴影部分最能体现2011年Z省对欧盟的出口额占当年Z省对8个主要市场出口总额比重的是()。
Readthetextbelowabouthowtoorderproducts.Inmostofthelines41-52thereisoneextraword.Itiseithergrammatically
A、Shedoesn’twantareply.B、She’llsendareplybymail.C、Sheprefersthemantoreplybyphone.D、Shedoesn’tknowtheman’s
最新回复
(
0
)