首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序: 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
2015-10-23
27
问题
编写如下程序:
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/xDLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
执行以下程序段后,变量c$的值为()。S$="VisualBasicProgramming"b$="Quick"c$=b$&UCase(Mid$(a$,7,6))&Right$(a$,12)
在窗体上画一个名称为Text1的文本框和一个名称为Commandl的命令按钮,然后编写如下事件过程:PrivateSubCommandl_Click()Dimarrayl(10,10)AsIntegerDimiAs
运行时,当用户向文本框输入新的内容,或在程序代码中对文本框的Text属性进行赋值从而改变了文本框的Text属性时,将触发文本框的()事件。
当一个对象(如窗体或图片框)被移动或改变大小之后,或当一个覆盖该对象的窗体被移开之后,如果要保持该对象上所画图形的完整性,可以选择触发()事件来完成图形的重画工作。
窗体上有一个图片控件和一个按钮控件,下列程序执行的结果是()。PfivateSubCommand1_click()Picture1.Picture=LoadPicture("C:\picture.ipg")Picture
在窗体上画一个文本框和一个图片框,然后编写下列两个事件过程:PrivateSubForm_C1ick()Textl.Text="VBProgramming"EndSubPrivateSubText1_change()
随机试题
企业确定要求达到的最低收益率的基础是
庆父不死,________。(《左传》)
配SPG溶液时应把PH值调到
牛,3岁,体温升高,呼吸浅表急速,腹式呼吸;听诊心音减弱,胸部有摩擦音,叩诊胸部有疼痛表现,水平浊音。该病最可能的诊断是()
患者,男,52岁。右上腹疼痛2个月,右胁胀满,胁下瘾块触痛,烦躁易怒,恶心纳呆,面色萎黄不荣,舌暗有瘀斑,苔薄白,脉弦涩。实验室检查:甲胎球蛋白510ng/ml,B型超声波示右肝叶占位性病变,直径5cm。其证型是
下列各项资本成本的计算中,需要考虑发行费用的有()。
国务院发布的《关于加强公安队伍建设的十二项措施》中,赋予了“110”报警服务台受理人民群众投诉公安机关和民警违法违纪问题的新职能。()
元代监察法律的集大成者是仁宗时期编纂的()。
如图所示,某园区网用10Gbps的POS技术与Internet相连,POS接口的帧格式是SONET。园区网内部路由协议采用OSPF,与Internet的连接使用静态路由协议。该园区网还通过一台Cisc02511和Modempool设备为用户提供拨号入网服
Whydopeopleplayteamsports?
最新回复
(
0
)