首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
以下Prime过程,用于判断一个数是否为素数。素数是只能被1和数本身整除的自然数。一个自然数不是素数,就是合数。用被测试的数除以从2开始到该数本身的数,如果能除尽(余数为0),则为合数;如果都除不尽(余数均不为0),则为素数。请在划线处将下面过程补充完整:
以下Prime过程,用于判断一个数是否为素数。素数是只能被1和数本身整除的自然数。一个自然数不是素数,就是合数。用被测试的数除以从2开始到该数本身的数,如果能除尽(余数为0),则为合数;如果都除不尽(余数均不为0),则为素数。请在划线处将下面过程补充完整:
admin
2009-03-15
72
问题
以下Prime过程,用于判断一个数是否为素数。素数是只能被1和数本身整除的自然数。一个自然数不是素数,就是合数。用被测试的数除以从2开始到该数本身的数,如果能除尽(余数为0),则为合数;如果都除不尽(余数均不为0),则为素数。请在划线处将下面过程补充完整:
Function Prime(inputvar As Integer)As Integer
For i=2 To inputvar-1
If inputvar Mod i=【 】Then
Go To comfinish
End If
Next i
Prime=inputvar
Print"素数"
Go To 【 】
comfinish:
Prime=inputvar
Print"合数"
finish:
End Function
选项
答案
0,finish
解析
空1:当输入的数inputvar除以从2开始的数为何值时,能确定该数为合数。显示,如果都能除尽,则为合数,故此处应当填入0。空2:程序已做完素数或合数的判断,应当转向结束分支finish。
转载请注明原文地址:https://kaotiyun.com/show/WT1p777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
如果要在Applet中显示特定的文字、图形等信息,可以在用户定义的Applet类中重写的方法是
阅读下面程序publicclassTestimplementsRunnable{publicstaticvoidmain(String[]args){__________________
一个栈的初始状态为空。现将元素1、2、3、4、5、A、B、C、D、E依次入栈,然后再依次出栈,则元素出栈的顺序是
下面程序的目的是在屏幕上显示当前目录下的文件信息。文件信息通过表格JTable的实例显示。请改正程序中的错误(有下划线的语句),使程序能输出正确的结果。注意:不改动程序的结构,不得增行或删行。importjava.awt.*;im
分析两个字符串,分别输出每个字符串的单词并统计出单词个数。阅读程序,填写空行。注意:不改动程序结构,不得增行或删行。importjava.util.*;publicclassex2{publicstat
Java源文件中最多只能有一个【】类,其他类的个数不限。
下列叙述中错误的是
下列命令中用于Java解释命令的是()。
在关系代数中,对一个关系投影操作以后,新关系的元组个数跟原来关系的元组个数相比()。
按作用域分类,变量有局部变量、【】、方法参数和异常处理参数。
随机试题
简述商业银行的信用中介职能。
耗散结构是指在远离__________下,系统可能出现的一种稳定的有序结构。
UnlessyouhavevisitedthesouthernUnitedStates,youprobablyhaveneverheardofkudzu.Kudzu,asanysouthernfarmerwills
下列是糖皮质激素的绝对适应证的是
患寒证、瘀证、疼痛、惊痫的小儿面色多是
药品批发和零售连锁企业的质量领导组织的职能是
文案创意的注意事项有______、_______、_______、_______、_______。
设计名为mystock的表单(控件名,文件名均为mystock)。表单的标题为“股票持有情况”。表单中有两个文本框(Text1和ext2)和三个命令按钮“查询”(名称为Command1)、“退出”(名称为Command2)和“清空”(名称为Command3
Thestudyofphilosophiesshouldmakeourownideasflexible.Weareallofusapttotakecertaingeneralideasforgranted,an
Allplantsneedlight,asuitableclimate,anda(n)______supplyofwaterandmineralsfromthesoil,butsomespeciesgrowbest
最新回复
(
0
)