首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
以下程序完成的功能是输入一个数n,并判断它是否为素数,是或不是都通过消息对话框(MsgBox)来给出提示。请将程序补充完整。 Private Sub Cemmand1_Click() n = InputBox (“请输入一个整数”) k = Int(Sqr
以下程序完成的功能是输入一个数n,并判断它是否为素数,是或不是都通过消息对话框(MsgBox)来给出提示。请将程序补充完整。 Private Sub Cemmand1_Click() n = InputBox (“请输入一个整数”) k = Int(Sqr
admin
2013-04-11
69
问题
以下程序完成的功能是输入一个数n,并判断它是否为素数,是或不是都通过消息对话框(MsgBox)来给出提示。请将程序补充完整。
Private Sub Cemmand1_Click()
n = InputBox (“请输入一个整数”)
k = Int(Sqr(n))
i = 2
Flag = 0
do while i<= k And Flag = 0
if【 】 = 0 then
Flag = 1
Else
i= i+ 1
End if
Loop
if【 】then
MsgBox “这是一个素数!”,vbOKOnly,“提示”
Else
MsgBox “这不是一个素数!”,vbOKOnly,“提示”
End if
End Sub
选项
答案
n Mod I,Flag=0
解析
求素数的计算可以从2至终值Sqr(n),如果条件“n Mod i=0”成立(即余数为0),“Flag=1”,a不是素数,否则“Flag=0”,a是素数,即可打印“这是一个素数!”。
转载请注明原文地址:https://kaotiyun.com/show/Pqhp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
可通过()方法把一个窗体隐藏起来,但不从内存中卸载。
在窗体上画一个名称为Command1的命令按钮,然后编写如下程序:PrivateSubCommand1_Click()StaticAAsIntegerStaticBAsIntegerB
现在软件工程界提倡的()是一种有效提高程序设计效率的方法。
如图所示,在列表框Listl中已经有若干人的简单信息,运行时在Text1文本框(即“查找对象”右边的文本框)输入一个姓或姓名,单击“查找”按钮,则在列表框中进行查找,若找到,则把该人的信息显示在Text2文本框中。若有多个匹配的列表项,则只显示第1个匹配项
在n个运动员中选出任意r个人参加比赛,有很多种不同的选法,选法的个数可以用公式计算。下图窗体中3个文本框的名称依次是Text1、Text2、Text。程序运行时在Text1、Text2中分别输入n和r的值,单击Commandl按钮即可求出选法的个数,
假定在工程文件中有一个标准模块,其中定义了如下记录类型TypeBooksNameAsString*10TelNumAsString*20EndType要求当执行事件过程Commandl_Clic
数据字典是各类数据描述集合,它通常包括5个部分,即数据项、数据结构、数据流、【】。和处理过程。
在窗体上画一个驱动器列表框、一个目录列表框和一个文件列表框,其名称分别为Drive1、Dir1和File1。当改变目录列表框的内容时,要求文件列表框中显示当前选中的文件夹中的内容,则在Dirl—Change事件过程中应使用的语句是:______。
将E-R图转换到关系模式时,实体与联系都可以表示成
随机试题
社会主义建设道路初步探索时期,()提出了以农业为基础、以工业为主导、以农轻重为序发展国民经济的总方针。
反式作用因子是指
患有高度二尖瓣狭窄时,会引起急性肺水肿伴休克,主要的原因是
最近10年,我国在农村与贫苦地区发展的社区综合口腔保健项目为
[2006年第65题]图5.3.2所示用冲床在厚度为t的钢板上冲出一圆孔,则冲力大小是()。
目前,各国根据各自的国情和实际需要,已经编制和形成了具有自身特点的建设项目合同条件范本或格式,一些国际组织也编制了适用于国际建设项目、较多考虑国际工程建设惯例的标准合同条件。由于建设项目性质、类型和风险不同,建设项目合同的繁简、格式也有所区别。不论哪一种建
某普通合伙企业委托合伙人杨某执行合伙事务,根据《合伙企业法》的规定,下列关于杨某执行合伙事务的权利义务的表述中,正确的是()。
嘉业股份有限公司(简称嘉业股份)是一家在上海证券交易所上市的公司,股本总额为8亿元,最近一期期末经审计的净资产为6亿元。2014年3月5日,嘉业股份董事会对以下几种融资方案进行了讨论:(1)优先股发行方案。该方案主要内容为:a.公开发行
Nocompanylikestobetolditiscontributingtothemoraldeclineofanation.Isthiswhatyouintendedtoaccomplishwithyo
下列数据结构中,能用二分法进行查找的是()。
最新回复
(
0
)