首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
下面程序的功能是输出100以内所有素数: Private Sub Commandl_Click() For n=2 To 100 isprime=True:k=2
下面程序的功能是输出100以内所有素数: Private Sub Commandl_Click() For n=2 To 100 isprime=True:k=2
admin
2020-04-18
49
问题
下面程序的功能是输出100以内所有素数:
Private Sub Commandl_Click()
For n=2 To 100
isprime=True:k=2
Do While k<=n/2 And_________
Ifn Mod k=0 Then isprime=False
k=k+1
Loop
If isprime Then Print n
Next n
End Sub
为使上面程序可以实现该功能,程序代码中横线处应填写的代码是
选项
A、isprime
B、Not isprime
C、n<100
D、n<=100
答案
A
解析
求素数的基本思路是,用2到n/2依次去除要判断的数n,如果能整除就将isprime置为False代表不是素数;如果isprime已经为False,那么循环没有继续执行的必要了,所以应填入isprime=True,由于是布尔型变量,可以简写为isprime。
转载请注明原文地址:https://www.kaotiyun.com/show/uYTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
一个工程中包含两个名称分别为Form1、Form2的窗体、一个名称为Func的标准模块。假定在Form1、Form2和Func中分别建立了自定义过程,其定义格式为:Form1中定义的过程:PrivateSubFunl()E
要求当鼠标在图片框Picturel中移动时,立即在图片中显示鼠标的位置坐标。下面能正确实现上述功能的事件过程是()。
在窗体上画一个名称为Commandl的命令按钮,然后编写如下事件过程:PrivateSubCornmandl_Click()c=1234c1=Trim(Str(c))Fori=1To
下面是求最大公约数的函数的首部Functiongcd(ByValxAsInteger,ByValYAsInteger)AsInteger若要输出8、12、16这3个数的最大公约数,下面正确的语句是
下列关于通用对话框CommonDialogl的叙述中,错误的是
有数据定义语句:Dima,bAsIntegerDimx%,YasInteger执行语句后,不是整型变量的是
下列操作说明中,错误的是
关于KevPress事件,以下叙述中正确的是
在窗体上画一个名称为Commandl的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()AS=”VisualBasic”PrintString(3,aS)EndSub
要使两个单选按钮属于同一个框架,下面三种操作方法中正确的是①先画一个框架,再在框架中画两个单选按钮②先画一个框架,再在框架外画两个单选按钮,然后把单选按钮拖到框架中③先画两个单选按钮,再画框架将单选按钮框起来
随机试题
2006年3月,20岁的刘灿在河东宾馆招聘中,经考核被录用为服务员,宾馆与刘灿签订了为期5年的劳动合同。合同条款之一是:“因宾馆服务业的特殊要求,凡被录用为本宾馆服务员的,不经公司批准在合同期内不得结婚,否则,宾馆有权提前解除合同。”刘灿在合同签字时,对该
A.细动脉硬化B.小动脉粥样硬化C.细动脉纤维素样坏死D.增生性小动脉炎和纤维素样坏死良性高血压的基本病变是
女性,32岁。突然发生右上腹阵发性绞痛,伴发热寒战,排柏油样便少量。查体急性病容,巩膜黄染。应考虑是
下列选项关于垃圾填埋场产生的气体的说法中,正确的有()。
CME交易的玉米期货看跌期权,执行价格为450美分/蒲式耳,权利金为22.3美分/蒲式耳(玉米期货期权的最小变动价位为1/8美分/蒲式耳),执行价格的玉米期货看涨期权的权利金为42美分/蒲式耳,则玉米期货看跌期权与看涨期权的实际价格分别为()。
小明期中考试成绩不理想,父母答应如果期末考试能考好,就给他买电脑,于是小明刻苦地学习,期末考试时取得了优异的成绩,从学习动机理论来看,这属于()。
教育要遵循个体身心发展的规律。《学记》中“当其可之谓时”“时过然后学,则勤苦而难成”这句话反映了人身心发展过程中存在的()现象。
计算下列反常积分:
设a=2,b=3,c=4,d=5,表达式Nota
AtodiscoversentencepatternsandgrammaticalrulesBtoexpandvocabularyCtousethetargetlanguageDtoencourageunsucce
最新回复
(
0
)