首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹中有一个工程文件sjt5.vbp。该程序的功能是从in5.txl文件中读入40个数据,统计这些数据中素数的个数,并找出所有素数中最小的素数(判断素数的函数已给出)。最后将杏找和统计的结果分别显示在标签Label4和Label3中(窗体外观如图所
在考生文件夹中有一个工程文件sjt5.vbp。该程序的功能是从in5.txl文件中读入40个数据,统计这些数据中素数的个数,并找出所有素数中最小的素数(判断素数的函数已给出)。最后将杏找和统计的结果分别显示在标签Label4和Label3中(窗体外观如图所
admin
2018-06-29
40
问题
在考生文件夹中有一个工程文件sjt5.vbp。该程序的功能是从in5.txl文件中读入40个数据,统计这些数据中素数的个数,并找出所有素数中最小的素数(判断素数的函数已给出)。最后将杏找和统计的结果分别显示在标签Label4和Label3中(窗体外观如图所示)。程序不完整,请在指定的位置把程序补充完整。
注意:不得修改原有程序和控件的属性。程序结束运行之前,必须至少正确运行一次程序,将统计的结果显示在标签中,否则无成绩。最后把修改后的文件按原文件名存盘。
选项
答案
步骤1:打开本题工程文件。 步骤2:分析并在适当位置编写程序代码。 参考答案 Dim a As Integer Dim b As Integer a=0 b=arr(1) For i=1 To 4 0’确定素数个数 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:按照题目要求调试并运行程序,效果如图3.16所示。 [*] 步骤4:关闭程序后,按题目要求存盘。
解析
除了1和它本身以外,不再有别的约数,这种整数叫做素数。判别某数m是否是素数的经典算法是:对于m,依次判别能否被I(I=2,3,4…m一1)整除,只要有一个能整除,m就不是素数,否则m是素数。本题需统计数据中素数的个数和所有素数中的最小素数。自定义函数过程prime用来判断是否为素数,返回True则为素数,反之则为非素数,通过对返回值的判断确定素数,并进行个数统计及查找最小值。
转载请注明原文地址:https://kaotiyun.com/show/WdGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画1个文本框,名称为Textl(multiline属性为True),然后再添加三个命令按钮,名称分别为Commandl、Command2和Command3,标题分别为“读数”、“统计”和“存盘”,如图所示。程序的功能是:单击“读数”按钮,则把考生文
(1)在名称为Forml,标题为“图片练习”的窗体上添加1个名称为Imagel、宽和高分别为1800和1200的图像框,设置属性使图形能自动放大或缩小以与图像框的大小相适应。最后将考生文件夹下的图片文件“picl.jpg”在图像框中显示。程序运行后的窗体如
编写如下程序:PrivateSubForm_Click()Print“Welcome!”EndSubPrivateSubForm_MouseDown(ButtonAsInteger,Shi
在窗体上画一个名称为Commandl的命令按钮,并编写如下程序:FunctionFun(X)y=0IfX
下列事件的事件过程中,参数是输入字符ASCII码的是()。
以下打开VisualBasic菜单编辑器的操作中,错误的是()。
考生文件夹下的工程文件sjt5.vbp中有1个初始文本为空的文本框Textl,2个标题分别是“读数据”和“计算”的命令按钮;请添加1个标题为“各行最小数的平均值为”的标签Label2,再添加1个初始文本为空的文本框Text2,如图所示。程序功能如下:
在窗体上画一个命令按钮和一个文本框,其名称分别为Commandl和Textl,把文本框的Text属性设置为空白,然后编写如下事件过程:PrivateSubCommandl_Click()a=InputBox(“En
下面程序运行时,若输入“VisualBasicProgramming”,则在窗体上输出的是()。PrivateSubCommand1_Click()Dimcount(25)AsInteger,chAsString
设在当前目录下有一个名为“file.txt”的文本文件,其中有若干行文本。编写如下程序:PrivateSubCommandl_Click()Dimch$.asciiAsIntegerOpen“file.t
随机试题
试述我国外科的发展与成就
A、羊水中脂肪细胞比例B、羊水中胆红素值C、B超测双顶径值D、羊水中L/S比值E、羊水中染色体检查检查胎儿先天畸形用()
A、鞣质B、胆汁酸C、柴胡D、黄芪E、马钱子有效成分为四环三萜皂苷类的是()
营养性巨幼细胞性贫血主要临床表现不包括
洪某用家庭共有财产20万元出资设立了一家个人独资企业,但是申请企业登记时候没有明确以家庭共有财产出资,关于企业债务下列说法正确的是:()。
泥石流流通区主要采取的防治措施为()。
以下科目中不属于流动资产的是()。
最高人民检察院对()负责。
抗日战争时期,国民政府“战时须作平时看”的教育方针是一项短视的政策。
类是一个支持集成的抽象数据类型,而对象是类的【】。
最新回复
(
0
)