首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp。在窗体文件中已经给出了全部控件及部分程序。程序运行时,在文本框Text1中输入一个大于2的偶数,并单击“分解为”按钮,则可以将该偶数分解为两个素数之和,且要求其中一个素数是所能够分解出的最小的素数(一个偶数有时
在考生文件夹下有一个工程文件sjt5.vbp。在窗体文件中已经给出了全部控件及部分程序。程序运行时,在文本框Text1中输入一个大于2的偶数,并单击“分解为”按钮,则可以将该偶数分解为两个素数之和,且要求其中一个素数是所能够分解出的最小的素数(一个偶数有时
admin
2020-02-27
85
问题
在考生文件夹下有一个工程文件sjt5.vbp。在窗体文件中已经给出了全部控件及部分程序。程序运行时,在文本框Text1中输入一个大于2的偶数,并单击“分解为”按钮,则可以将该偶数分解为两个素数之和,且要求其中一个素数是所能够分解出的最小的素数(一个偶数有时可以分解为多种素数的组合,例如24可以分解为5和19,也可以分解为11和13,要求取含有最小素数的组合,如图3一178所示)。要求编写“分解为”按钮事件过程中“考生编写程序开始"和“考生编写程序结束”之间的代码,以实现上述功能。过程IsPrime用来判断一个数是否为素数,如果是,返回值为True,否则返回值为False。
注意:不得修改原有程序和控件的属性。至少正确运行一次程序,且运行时在文本框中输入23456,单击“分解为”按钮,将结果显示在标签中,否则无成绩。最后把修改后的文件按原文件名存盘。
选项
答案
步骤1:打开考生文件夹中的本题工程文件sjt5.vbp,在代码编辑窗口的指定位置编写以下代码。 参考代码: Dim i As Integer Dim n As Integer n=Val(Text1.Text) If n Mod 2 <>0 Then MsgBox"请输入偶数!" Exit Sub End If For i=2 To n/2 If IsPrime(i) And IsPrime(n—i) Then Label1.Caption=i Label2.Caltion=n-i Exit For End If Next 步骤2:按
键运行程序,在文本框中输入23456,单击“分解为”按钮。 步骤3:按要求将文件保存至考生文件夹中。
解析
本题程序设计思路:两个整数之和为n的组合有:1和n-1、2和n-2…i和n-i,在For循环中按前一个加数由小到大的顺序,依次通过调用函数IsPrime来判断每个组合中的两个加数是否均为素数,第一个找到的素数组合中即含有能够分解出的最小素数。由于1不是素数,故循环变量的初值从2开始;由于i和n-i的组合与n-i和i组合在本题中可被视为相同组合,故循环变量的终值设定为n/2即可。
转载请注明原文地址:https://kaotiyun.com/show/FVTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
vateSubCommand1_Crick()DimmAsInteger,nAsIntegerm=1:n=0DoWbilem<20n=m+nm=3*m+1LoopPrintm,nEndSub程序运行后,单击命令按钮C
(1)在名称为Form1的窗体上画两个标签(名称分别为Label1和Label2,标题分别为“姓名”和“年龄”)、两个文本框(名称分别为Text1和Text2,初始内容均为空)和一个命令按钮(名称为Command1,标题为“显示”)。然后编写命令按钮的Cl
有人在属性窗口中通过设置Picture属性为命令按钮装入了图片,但没有显示,其原因是
某系统总体结构图如下图所示:该系统总体结构图的深度是( )。
以下叙述中正确的是()。
以下关于VB的叙述中,错误的是()。
下列排序方法中,最坏情况下比较次数最少的是( )。
下面的数写成普通十进制数是()。8.6787E+8
8.6787E+8写成普通的十进制数是()。
与十进制数511等值的十六进制数为
随机试题
抗日民主政权干部奖励的方式有()
已知线性方程组在方程组有无穷多个解时,求出方程组的通解(要求用其一个特解和导出组的基础解系表示).
患者身热,微恶风,汗少,肢体酸重,头昏重胀痛,咳嗽痰黏,鼻流浊涕,心烦,口渴,舌苔薄黄而腻,脉濡数。治疗应首选( )。
A.湿热蕴结B.气滞血瘀C.寒湿阻络D.气血两虚E.痰湿凝聚猫眼疮患者,皮损暗红,遇寒加重,下肢沉重,关节痛,小便清长,舌淡,苔白脉沉。辨证为()
男,24岁,车祸导致颈椎骨折,病人颈部疼痛,呼吸费力,四肢瘫痪。护士向家属介绍探视制度,属于
【2011—3】题11~15:某用户根据负荷发展需要,拟在厂区内新建一座变电站,用于厂区内10kV负荷的供电。该变电站电源取自地区110kV电网(无限大电源容量),采用2回110kV架空专用线路供电。变电站基本情况如下:(1)主变采用两台三相双卷自冷型油
某脱粒机厂(增值税一般纳税人)2005年10月生产销售农用脱粒机取得不含税销售收入80万元,为农民修理脱粒机取得修理费收入10万元,当月购进零配件,增值税专用发票上注明的税款为8.5万元(零配件已验收入库),则该厂本月应纳的增值税税额为( )。
制定内部转移价格时,如果选择参照协商价格,则其下限是()。
人民检察院提起公诉的案件,应当向人民法院移送主要证据的复印件或者照片,对于适用简易程序的公诉案件,人民检察院可以派员也可以不派员出庭,则以下人民检察院做法正确的是()。
天上的云,真是姿态万千,变化无常。它们有的像羽毛,轻轻地飘在空中:有的像鱼鳞,一片片整整齐齐地排列着;有的像羊群,来来去去;有的像一床大棉被,严严实实地盖住了天空;还有的像峰峦,像河流,像雄狮,像奔马……它们有时把天空点缀得很美丽,有时又把天空笼罩得很阴森
最新回复
(
0
)