首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹中有一个工程文件sjt5.vbp,该程序的功能是从in5.tx1文件中读入40个数据,统计这些数据中素数的个数,并找出所有素数中最小的素数(判断素数的函数已给出)。最后将查找和统计的结果分别显示在标签Label4和Label3中(窗体外观如图所
在考生文件夹中有一个工程文件sjt5.vbp,该程序的功能是从in5.tx1文件中读入40个数据,统计这些数据中素数的个数,并找出所有素数中最小的素数(判断素数的函数已给出)。最后将查找和统计的结果分别显示在标签Label4和Label3中(窗体外观如图所
admin
2019-06-24
44
问题
在考生文件夹中有一个工程文件sjt5.vbp,该程序的功能是从in5.tx1文件中读入40个数据,统计这些数据中素数的个数,并找出所有素数中最小的素数(判断素数的函数已给出)。最后将查找和统计的结果分别显示在标签Label4和Label3中(窗体外观如图所示)。程序不完整,请在指定的位置把程序补充完整。
注意:不得修改原有程序和控件的属性。程序结束运行之前,必须至少正确运行一次程序,将统计的结果显示在标签中,否则无成绩。最后把修改后的文件按原文件名存盘。
选项
答案
【操作步骤】 步骤1:打开本题工程文件。 步骤2:分析并在适当位置编写程序代码。 参考答案 Dim a As Integer Dim b As Integer a=0 b=arr(1) For i=1 To 40’确定素数个数 If prime(arr(i))Then’判断是否为素数 a=a+1’素数个数累加 Label3.Caption=a’在标签中显示 Next For i=1 To 40’查找最小素数 If prime(arr(i))And arr(i) <=b Then’比较素数大小 b=arr(i)’将较小素数赋给b Label4.Caption=b’在标签中显示 Next 步骤3:按照题目要求调试并运行程序,效果如图4.16所示。 [*] 步骤4:关闭程序后,按题目要求存盘。
解析
除了1和它本身以外,不再有别的约数,这种整数叫做素数。判别某数m是否是素数的经典算法是:对于m,依次判别能否被I(I=2,3,4…m—1)整除,只要有一个能整除,m就不是素数,否则m是素数。本题需统计数据中素数的个数和所有素数中的最小素数。自定义函数过程prime用来判断是否为素数,返回True则为素数,反之则为非素数,通过对返回值的判断确定素数,并进行个数统计及查找最小值。
转载请注明原文地址:https://kaotiyun.com/show/tqUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
窗体上命令按钮的事件过程如下:PrivateSubCommand1_Click()A="34":B="26":C="98"PrintB+C+AEndSub运行程序后,单击命令按钮,输出结果是()。
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Form1、标题为“鼠标光标形状示例”的窗体上画1个名称为Text1的文本框。请通过属性窗口设置适当属性,使得程序运行时,鼠标在文本框中时,鼠标光标为箭头(Arr
(1)在考生文件夹下有一个工程文件sjt3.vbp,相应的窗体文件为sjt3.frm。在窗体上有一个名称为Command1、标题为“计算”的命令按钮;两个水平滚动条,名称分别为Hscroll1和Hscroll2,其Max属性均为100,Min属性均为1;四
设程序中有如下数组定义和过程调用语句:Dima(10)AsIntegerCallp(a)如下过程定义中,正确的是
假定建立了一个名为Command1的命令按钮数组,则以下说法中错误的是
下面可以产生20~30(含20和30)的随机整数的表达式是
下面程序在调试时出现了死循环PrivateSubCommand1_Click()n=InputBox(“请输入一个整数”)DoIfnMod2=0Thenn=n+1Elsen
VisualBasic中的“启动对象”是指启动VisualBasic应用程序时,被自动加载并首先执行的对象。下列关于VisualBasic“启动对象”的描述中,错误的是
在深度为7的满二叉树中,叶子结点的个数为
把数学表达式表示为正确的VB表达式应该是()。
随机试题
由于金融市场上金融工具交易价格的波动而给金融工具的持有者带来损失的可能性,这种风险被称为
对狂犬病病犬做病理检查,能在细胞浆内见嗜酸性包涵体的是
下列药品中,保管中最易受潮变质的是
甲、乙两公司因担保合同发生争议,争议数额为100万元人民币。现依据担保合同的仲裁条款申请仲裁,本案应按下列哪项组成仲裁庭?()
如果个人信用贷款发生展期,则展期前的利息按照()计付。
如贷款为分期逐笔到期,在出现贷款逾期时,银行应逐笔进行书面确认,逐笔保证()的诉讼时效。
2010年食物与营养发展总体目标不包括()。
在社区矫正工作中,社会工作者通过综合治理,改善矫正对象的生活环境,并通过社区教育形成有利于矫正对象改过自新的社会氛围。这些做法是()在矫正社会工作中的运用。
“十一五”期间,我国网民平均每年增长()。
已知x≥0时,g(x)可导,ln(1+x)是g(x)的一个原函数,且求
最新回复
(
0
)