首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
为了验证一个正整数n(n>3)是否为素数,最直观的方法是,看在2~n/2范围内能否找到一个整数m将n整除,若m存在,则n不是素数;若找不到m,则n为素数。在考生文件夹下有一个工程文件sjt5.vbp,其窗体上有1个名称为Text1的文本框。请根据上面的算法
为了验证一个正整数n(n>3)是否为素数,最直观的方法是,看在2~n/2范围内能否找到一个整数m将n整除,若m存在,则n不是素数;若找不到m,则n为素数。在考生文件夹下有一个工程文件sjt5.vbp,其窗体上有1个名称为Text1的文本框。请根据上面的算法
admin
2017-03-26
24
问题
为了验证一个正整数n(n>3)是否为素数,最直观的方法是,看在2~n/2范围内能否找到一个整数m将n整除,若m存在,则n不是素数;若找不到m,则n为素数。在考生文件夹下有一个工程文件sjt5.vbp,其窗体上有1个名称为Text1的文本框。请根据上面的算法,编写判断一个正整数是否为素数的函数prime,然后用这个函数找出200~300之间的所有素数,求出这些素数的和,将该数在文本框中显示出来,并存入文件out5.txt中。
要求:编写函数prime的代码,然后在Form_Click事件过程中调用该函数,并计算素数的和。事件过程中已给出了把素数和保存到文件中的代码,考生不得修改。
注意:请务必把求得的和在文本框中显示出来,这样才能存入文件out5.txt,否则没有成绩。
选项
答案
步骤1:打开考生文件夹中的工程文件sjt5.vbp,在代码编辑窗门中,去掉程序中的注释符“’”,将问号“?”改为正确的内容。 参考代码: FUriCtion prime(ByVal n As Integer) As Boolean ’******考生编写****** Dim flact As Boolean flag=IIf(n>1,True,False) For m=2To n/2 If n Mod m=0Then flaq=False Exit For End If Next m prime=flag ’******************** End Function Private Sub Form Click() ’******考生编写****** Dim sun As Integer For n=200To300 If prime(n) Then Sum=Sum+n End If Next n Text1.Text=Sum ’******************** Open App.Path&"\out5.txt"For Output As#1 Print#1,Text1.Text Close1 End Sub 步骤2:按<F5>键运行程序,单击各个按钮测试验证。 步骤3:按要求将文件保存至考生文件夹中。
解析
题目要求计算200~300之间的素数和,可通过一个循环来实现,在循环里面逐个判断200~300之间的数是否为素数,如果是计算累加和。
函数prime用来判断输入参数n是否为素数,方法是2~n/2范围内能否找到一个整数m将n整除,若m存在,则n不是素数;若找不到m,则n为素数。设计程序的时候,通过循环来实现,循环变量m从2开始,循环结束条件为n/2,Step为1,如果n mod m为0,表示m将n整除,n不是素数。
转载请注明原文地址:https://kaotiyun.com/show/BmGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设窗体上有一个名称为HSl的水平滚动条,如果执行了语句:HSI.Value=(HSl.Max—HSI.Min)/2+HSl.Min则:
在窗体上画1个名为Text1的文本框和1个名为Label1的标签,再画4个名为Op1的单选按钮控件数组,其Index属性按季度顺序为0~3,如图1所示。在文件Sales.txt中按月份顺序存有某企业某年12个月的销售额。要求在程序执行时,鼠标单击一个单选按
以下各组序列中,属于堆的是
为了使模块尽可能独立,要求
在进行模块测试时,要为每个被测试的模块另外设计两类模块:驱动模块和承接模块(桩模块)。其中______的作用是将测试数据传送给被测试的模块,并显示被测试模块所产生的结果。
下列______是Single型变量。
在程序运行期间可以将图形装入窗体、图片框或图像框的函数是
下列叙述中正确的是()。
由Array函数建立的数组的名字必须是【】类型。
随机试题
属于眼球外膜的结构是
患者,男,41岁。3小时前在睡眠中突发胸痛,有压抑感,伴大汗而来诊。既往无类似病史,曾查血脂高,吸烟史20年。查体:血压120/70mmHg,脉搏70分/次,双肺(一),心尖部可闻S4,未闻杂音。心电图示:Ⅰ、aVL、V2~V4导联ST段下降。CK一MB正
一列车从远处驶来,观察者测得列车的汽笛声频率为500Hz,当列车从身旁驶过而远离他时,测得火车的汽笛声频率为500Hz,若空气中声速为:μ=330m/s,则列车行驶的速度为:
一、背景某建筑空调工程中的冷热源主要设备由某施工单位吊装就位,设备需吊装到地下一层(—7.5m),再牵引至冷冻机房和锅炉房安装就位。施工单位依据设备一览表(见表一)及施工现场条件(混凝土地坪)等技术参数进行分析、比较,制定了设备吊装施工方案,方案
根据下边图形呈现的规律,在所给备选答案中选出最合理的一项。
下列中国名茶中属于绿茶的是()。
有人认为,教育投资是有效的生产性投资。这种观点主要反映了教育的哪种功能?()
在电影全产业链建设方面,好莱坞是一个非常好的_______,虽然不能完全套用,但其高度产业化的战略、高科技驱动的制作和细分观众的不懈努力,是有巨大_______价值的。填入画横线部分最恰当的一项是:
国务院实行总理负责制,它的任期每届与全国人大的任期相同。()
KeytoGoodLanguageLearningTolearnalanguagemoreeffectively,languagelearnersshouldhaveaccesstoresourcesorop
最新回复
(
0
)