首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体中有文本框Text1和标签Label1。运行程序,输入大于0的整数m,单击按钮Command1,程序判断m是否为素数,若是素数,则Label1显示"m 是素数",否则显示"m 是合数"。事件代码如下: Private Sub Command1_Clic
窗体中有文本框Text1和标签Label1。运行程序,输入大于0的整数m,单击按钮Command1,程序判断m是否为素数,若是素数,则Label1显示"m 是素数",否则显示"m 是合数"。事件代码如下: Private Sub Command1_Clic
admin
2021-09-06
70
问题
窗体中有文本框Text1和标签Label1。运行程序,输入大于0的整数m,单击按钮Command1,程序判断m是否为素数,若是素数,则Label1显示"m 是素数",否则显示"m 是合数"。事件代码如下:
Private Sub Command1_Click()
m = Val(Me!Text1)
result = m & " 是素数"
k = 2
Do While k <= m / 2
If m Mod k = 0 Then
result = m & " 是合数"
【 】
End If
k = k + 1
Loop
Me!Label1.Caption = result
End Sub
程序【 】处应填写的语句是
选项
A、Exit
B、Exit Loop
C、Exit While
D、Exit Do
答案
D
解析
本题是考察输入的m是否为素数,素数是指除了1和它本身之外没有别的约数,所以在while循环里只要m对k不能整除,说明k不是m的约数,否则M有小于本身的约数就不是素数,下面就不用再判断了,直接跳出DO循环。DO…while退出时,用Exit do。因此,本题应选择D选项。
转载请注明原文地址:https://www.kaotiyun.com/show/HVvp777K
本试题收录于:
二级Access题库NCRE全国计算机二级分类
0
二级Access
NCRE全国计算机二级
相关试题推荐
表示学生选修课程的关系模式是SC(S#,C#,G),其中S#为学号,C#为课程号,G为成绩,检索选修了课程号为2的课且成绩不及格的学生学号的表达式是
假设某数据库已建有宏对象“宏1”,“宏1”中只有一个宏操作SetValue,其中第一个参数项目为“[Labe10].[Caption]”,第二个参数表达式为“[Text0]”。窗体“fmTest”中有一个标签Labe10和一个文本框Text0,现设置控件
宏操作Quit的功能是
学校图书馆规定,一名旁听生同时只能借一本书,一名在校生同时可以借5本书,一名教师同时可以借10本书,在这种情况下,读者与图书之间形成了借阅关系,这种借阅关系是
在数据表中,对指定字段查找匹配项,按下图“查找”和“替换”对话框中的设置,查找的结果是
关系数据库规范化的目的是为了解决关系数据库中的
窗体中有3个命令按钮,分别命名为Command1、Command2和Command3。当单击Command1按钮时,Command2按钮变为可用,Command3按钮变为不可见。下列Command1的单击事件过程中,正确的是
将数据库的结构划分成多个层次,是为了提高数据库的
下列实体的联系中,属于多对多联系的是
在教师表中,如果要找出职称为“教授”的教师,所采用的关系运算是
随机试题
22岁孕妇检查显示羊水过少,可能性有哪些原因引起
患者呼吸急促。查体:气管向左偏移,右侧胸廓饱满,叩诊出现实音。应首先考虑的是
某山脉一河流流域总面积25900km2,干流长度383km,天然落差2493m,水量丰沛,干流河床比降大,年平均径流量158m3/s,水能资源丰富。在该河流上游距离河口146km处已经有一蓄水5.4亿m3。的水库。河段所在地区经济不发达,流域总人
某有限责任公司原由ABC三位股东各出资10万元组建。经过2年的经营后,该公司的实收资本增加为36万元,留存收益为12万元。现D愿意出资25万元,占该公司25%的股权。则D出资者所出资金中有()应计入资本公积。
“先生,给现洋钱,袁世凯,不行么?白白的米换不到白白的现洋钱,好像又被他们打了一个折扣,怪不舒服。”这句话的修辞手法()。
巴尔扎克:文学家
设fn(x)=x+x2+…+xn(n≥2).证明方程fn(x)=1有唯一的正根xn;
Heneverdreamtof______forhimtobesentabroadverysoon.
Areyousatisfiedwithyourjob?
Youshouldspendabout20minutesonQuestions14-26,whicharebasedonReadingPassage2below.Therehasalwaysbeenasense
最新回复
(
0
)