首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
下面程序的功能是输出100以内所有素数: Private Sub Command1_Click() For n=2 To 100 isprime=True k=2 Do While k<=n/2 And______________ If n Nod k=0
下面程序的功能是输出100以内所有素数: Private Sub Command1_Click() For n=2 To 100 isprime=True k=2 Do While k<=n/2 And______________ If n Nod k=0
admin
2020-01-02
58
问题
下面程序的功能是输出100以内所有素数:
Private Sub Command1_Click()
For n=2 To 100
isprime=True
k=2
Do While k<=n/2 And______________
If n Nod k=0 Then isprime=False
k=k+1
Loop
If isprime Then
Print n
End If
Next n
End Sub
为使上面程序可以实现该功能,程序代码中横线处应填写的代码是
选项
A、isprime
B、Not isprime
C、n<100
D、n<=100
答案
A
解析
素数是大于1的自然数,除了1和本身不能被任何数整除的数。程序用Do While循环对n进行判断,如能被整除isprime赋值为False。否则赋值为True。随后的代码检测isprime为True时执行打印。因此Do While判断条件中除了判断循环变量的上限还需要判断isprime的值。根据执行条件可知,选A。
转载请注明原文地址:https://kaotiyun.com/show/p1Tp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在标准模块中,将a定义为全局整型变量的语句是
命令按钮、单选按钮、复选框都可以通过Picture属性在控件上显示图片,但需事先设置某一属性,该属性为
在窗体上画一个名称为Timer1的计时器控件,要求每隔0.5秒发生一次计时器事件,则以下正确的属性设置语句是
假定一个工程由一个窗体文件Form1和两个标准模块文件Model1和Model2组成Model1的代码如下:PublicxAsInteger:Publicy,AsIntegerSubS1()SubS
在VisualBasic环境下设计应用程序时,系统能自动检查出的错误是
设窗体上有一个通用对话框控件CD1,希望在执行下面程序时,打开如图所示的文件对话框PrivateSubCommandqClick()CD1.DialogTitle=“打开文件”CD1.InitDit="C:\"CDl.Filte
在窗体上有1个名为Cd1的通用对话框,为了在运行程序是时打开保存文件对话框,险则在程序中应使用的语句是
窗体上有一个用菜单编辑器设计的菜单。运行程序,并在窗体上单击鼠标右键,则弹出一个快捷菜单,如图所示。以下叙述中错误的是
执行下面的程序段后,变量S的值为()。S=5Fori=2.6To4.9Step0.6S=S+1Nexti
在数据库管理系统提供的数据语言中,负责数据的查询、增加、删除和修改等操作的是
随机试题
请论述我国认证制度的总体架构。
根据《企业破产法》的规定,破产管理人应当向何种机关报告其工作()
急性胰腺炎剧烈腹痛时,正确的药物镇痛措施为
图6-15所示一高压喷嘴,喷嘴出口断面1-1的平均流速为10m/s,喷至2-2断面的平均流减少为1m/s,不计水头损失,则喷射高度H为()m。
弗里德曼的货币需求函数强调的是()。
当今世界正处在大发展大调整大变革之中,和平、发展、合作是时代潮流,同时国际金融危机的影响尚未消除,全球性挑战日益增多。这其中,有两个趋势日益明显。一是,全球化与多极化并行发展。当前,经济全球化、区域一体化深人推进,生产要素在全球范围内优化配置,信息网络无处
Allthepupilsseemtobevery(cheerful).
SteveCourtneywrotehistoricalnovels.Not,hewasquicktoexplain,over-colorfullovestoriesofthekindthatmadesomuchm
WhataretheygoingtodonextFriday?
A、Theyhelptocureanxiety.B、Theyhelpgaininsightintothecauseofanxiety.C、Theyhelptocontrolanxiety.D、Theyhelppat
最新回复
(
0
)