首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
数列1,1,3,5,9,15,25,41,…,的规律是从第三个数开始,每个数是它前面两个数的和加1。在考生目录下有一个工程文件sjt5.vbp。窗体中已经给出了所有控件,如图3—192所示。请编写适当的事件过程实现以下功能:在Text1中输入整数40,单击
数列1,1,3,5,9,15,25,41,…,的规律是从第三个数开始,每个数是它前面两个数的和加1。在考生目录下有一个工程文件sjt5.vbp。窗体中已经给出了所有控件,如图3—192所示。请编写适当的事件过程实现以下功能:在Text1中输入整数40,单击
admin
2017-03-27
39
问题
数列1,1,3,5,9,15,25,41,…,的规律是从第三个数开始,每个数是它前面两个数的和加1。在考生目录下有一个工程文件sjt5.vbp。窗体中已经给出了所有控件,如图3—192所示。请编写适当的事件过程实现以下功能:在Text1中输入整数40,单击“计算”按钮,则在Text2中显示该数列第40项的值。如果单击“存盘”按钮,则将计算的第40项的值存到考生目录下的out5.txt文件中。(提示:因数据较大,应使用Long型变量。)
注意:在结束程序运行之前,必须单击“存盘”按钮,把结果存入out5.txt文件,否则无成绩。最后把修改后的文件按原文件名存盘。
选项
答案
步骤1:打开考生文件夹下的工程文件sjt5.vbp。 步骤2:编写“计算”按钮的单击事件过程。 参考代码: Private Sub Command1_Click() Dim f As Long a(1)=1:a(2)=1 For i=3To Val(Text1.Text) f=a(i-2)+a(i-1)+1 a(i)=f Next Text2.Text=f End Sub 步骤3:运行程序,在文本框中输入40,并单击“计算”按钮获得一个结果,然后单击“存盘”按钮保存计算结果。 步骤4:按要求将文件保存至考生文件夹中。
解析
根据题意,从数列的第三个数开始,每个数是其前两个数之和加1,数列第n项的值可表示为:
a(i)=a(i-1)+a(i-2)+1。可以利用For循环语句(循环变量i的初值为3,终值为Text1.Text),从数列的第三个数开始,逐一计算出该数列第3~n项的值,计算表达式为a(i)=a(i-1)+a(i-2)+1。
转载请注明原文地址:https://kaotiyun.com/show/DhGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
当一个工程含有多个窗体时,其中的启动窗体是______。
要使标签能够显示所需要的文本,则在程序中应设置()属性的值。
下列程序运行后,在窗体上打印的结果是【】。PrivateSubtest(a,b,c)a=a+1:b=b+2:C=C+3EndSubPrivateSubCommand1
下列事件过程的功能是:建立一个名为Data1的随机文件,存放角度值及这些角度的正弦函数值和余弦函数值,角度:1,2,3,…,90。请在空白处填入适当的内容,将程序补充完整。PrivateTyPeAngKAsIntegerSinxAsSin
在进行模块测试时,要为每个被测试的模块另外设计两类模块:驱动模块和承接模块(桩模块)。其中______的作用是将测试数据传送给被测试的模块,并显示被测试模块所产生的结果。
在窗体上画一个命令按钮command1和两个文本框,名称分别为Text1和Text2。编写如下两个事件过程:DimStr1AsString,str2AsStringPrivateSubform_load()Tex
随机试题
新西兰奥克兰大学的研究人员与来自英国和美国的研究小组在4年内共同对将近1.2万名老人进行了11项调查。其中一半的老人服用钙片,而另一半则服用没有药物成分的安慰剂。结果显示,前一组当中每1000人中突发心肌梗死、中风甚至死亡的案例比后一组分别多14起、10起
根据下面所提供的汉语学习者口语交际中的句子回答问题例句1:这个老鹰是男的。例句2:这是一个动物,在Australia的,像……恩,老鼠一样的,有孩子在肚子里,跳跳。例句3:如果你的头发足湿湿的,你可以用这个把头发,头发,头发十。例句4:我们上北京,
关于钙离子的说法正确的是()。
世贸组织的非歧视贸易原则,主要依靠以下内容体现:
在超声波加工机床上,换能器的作用是()。
根据《劳动法》的规定,用人单位由于生产经营需要延长工作时间,应当与其协商的有()。
如图,在正方体ABCD—A1B1C1D1中,棱长AA1=2,E为CC1的中点.求点D1到平面EAB的距离.
一国两制
最近发展区
设随机变量向量组α1,α2线性无关,则Xα1一α2,一α1+Xα2线性相关的概率为().
最新回复
(
0
)