首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹中有一个工程文件sjt5.vbp。该程序的功能是从in5.txl文件中读入40个数据,统计这些数据中素数的个数,并找出所有素数中最小的素数(判断素数的函数已给出)。最后将杏找和统计的结果分别显示在标签Label4和Label3中(窗体外观如图所
在考生文件夹中有一个工程文件sjt5.vbp。该程序的功能是从in5.txl文件中读入40个数据,统计这些数据中素数的个数,并找出所有素数中最小的素数(判断素数的函数已给出)。最后将杏找和统计的结果分别显示在标签Label4和Label3中(窗体外观如图所
admin
2018-06-29
28
问题
在考生文件夹中有一个工程文件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)在考生文件夹中有一个工程文件sjt3.vbp。运行程序时,先向文本框Textl中输入一个不超过10的正整数,然后选择“N的阶乘”或“(N+2)的阶乘”单选钮,即可进行计算,计算结果在文本框Text2中显示,如图所示。在给出的窗体文件中已经添加了全部控
编写如下程序:PrivateSubCommandl_Click()Dima(3,3)AsIntegerDimsAsIntegerFori=lTo3Forj=1To3
以下打开VisualBasic菜单编辑器的操作中,错误的是()。
在VisualBasic中,所有标准控件都具有的属性是()。
软件设计包括软件的结构、数据接口和过程设计,其中软件的过程设计是指()。
(1)在考生文件夹下有一个工程文件sjt3.vbp,含有两个窗体,名称分别为。ForTnl、Form2。其中,Forml上有两个控件(图像框和计时器)和一个菜单项“操作”,含有三个子菜单(如图l所示)。Form2上有一个,名称为Commandl、标题为“
(1)在名称为Forml的窗体上添加一个名称为Labell、标题为“设置速度”的标签,通过属性窗口把标签的大小设置为自动调整。添加一个名称为HScrolll的水平滚动条,通过属性窗口设置适当属性使滚动条的最小值为l,最大值为80,单击滚动条两端的箭头时,滚
在窗体上画一个命令按钮和一个文本框,其名称分别为Commandl和Textl,把文本框的Text属性设置为空白,然后编写如下事件过程:PrivateSubCommandl_Click()a=InputBox(“En
在考生文件夹下有一个工程文件sjt5.vbp,界面如图所示,其功能如下:①单击“读数据”按钮,则把考生文件夹下文件in5.dat中的12组整数(其中每组含有10个数,共计120个整数)读到数组a中;②单击“计算”按钮,则对每组数求平均
随机试题
SevenSecretsofNaturallyThinPeople[A]Youhatethem.Youknowthetype…theoneswhoneverbataneyewhenitcomestim
下列选项中属于动画制作软件的是______________。
男性,51岁。逐渐加重的呼吸困难8个月,双肺中下肺野可闻及响亮中小水泡音,胸片示双肺中下肺野呈弥漫性小结节病灶,肺功能为限制性通气障碍,最可能的诊断是
女,52岁,乏力,怕冷,便秘伴声音嘶哑1年,体重增加8kg。经检查诊断为甲状腺功能减退症,拟用左甲状腺素替代治疗。最适宜的起始剂量是
在金融服务日趋大众化的今天,许多人都与银行发生了借贷关系,于是归还银行贷款就成了许多人固定支出的最主要部分。()
某内资企业(经营家用电器)2005年度有关财务资料如下:(1)利润总额为200万元。(2)销售收入为2000万元。(3)管理费用中列支业务招待费20万元,广告费30万元。(4)企业年度工资支出80万元,并计提职工福利经费2万元、职工工会经费1.6万
A企业是一家历史悠久的中药企业,在消费者中拥有极高的声誉,形成企业独特的核心能力。这种市场声誉从企业资源角度分析属于企业的()。
人民警察散布有损国家声誉的言论,情节较重的,给予()处分。
根据下面材料回答下列问题。2016年,全国共投入研究与试验发展(R&D)经费15676.7亿元,比上年增加1506.9亿元,增长10.6%,增速较上年提高1.7个百分点;研究与试验发展(R&D)经费投入强度(与国内生产总值之比)为2.11%.比上年提高0
窗体上有一个如右图所示的图形控件,控件中显示了如图所示的文字,可以判断这个图形控件( )。
最新回复
(
0
)