首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
数列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
2018-07-11
48
问题
数列1,1,3,5,9,15,25,41,…,的规律是从第三个数开始,每个数是它前面两个数的和加1。在考生目录下有一个工程文件sjt5.vbp。窗体中已经给出了所有控件,如图3.192所示。请编写适当的事件过程实现以下功能:在Text1中输入整数40,单击“计算”按钮,则在Text2中显示该数列第40项的值。如果单击“存盘”按钮,则将计算的第40项的值存到考生目录下的out5.txt文件中。(提示:因数据较大,应使用Long型变量。)
注意:在结束程序运行之前,必须单击“存盘”按钮,把结果存入out5.txt文件,否则无成绩。最后把修改后的文件按原文件名存盘。
选项
答案
步骤1:打开考生文件夹下的工程文件sjl5.vbp。 步骤2:编写“计算”按钮的单击事件过程。参考代码: Private Sub Command1_Click() Dim f As Long a(1)=1:a(2)=1 For i=3 To 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://www.kaotiyun.com/show/EOGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在名称为Framel的框架中,有两个名称分别为opl、op2的单选按钮,标题分别为“单程”、“往返”,如图所示。
设在当前目录下有一个名为“file.txt”的文本文件,其中有若干行文本。编写如下程序:PrivateSubCommandl_Click()Dimch$.asciiAsIntegerOpen“file.t
设有下面的语句:PrintIIf(x>0,1,IIf(X
要使图像框(Image)中的图像能随着图像框的大小伸缩,应该设置的属性及值是()。
用来设置文字字体是否为粗体的属性是()。
要想使列表框只允许单选列表项,应设置的属性为()。
在窗体上画一个名称为Combol的组合框,名称为Textl的文本框,以及名称为Commandl的命令按钮,如图所示。运行程序,单击命令按钮,将文本框中被选中的文本添加到组合框中,若文本框中没有选中的文本,则将文本框中的文本全部添加到组合框中。命令按钮的
现有语句:Y=IIf(x>0,xMod3,0)设x=10,则Y的值是()。
已知列表框控件List1中已放入若干表项,下列关于List1的叙述中错误的是
下列运算符中,优先级别最低的是
随机试题
简述狄更斯的作品具有的“一派出色的小说家”的鲜明特征。
计算二重积分,其中D是顶点分别为(0,0)(1,1)(2,0)的三角形闭区域.
下列关于片剂叙述中,不符合其特点的是
企业存在的根本原因是()。
市场利率下降,对股票价格的影响是()。
随着人们生活水平的提高,人们对“绿色文化”越来越重视。现在你所在的部门要针对“绿色文化”开展一次研讨活动。由你来组织。请问你如何处理?
李某与王某发生口角后,王某声称要把李某杀死,并去商店买了一把匕首,李某怕王某杀死自己,就在王某从商店回来的路上,用猎枪打死了王某。李某的行为属于()。
爱情是一对男女基于一定的社会基础和共同的生活理想,在各自内心形成的相互倾慕,并渴望对方成为自己终身伴侣的一种强烈、纯真、专一的感情。构成爱情的基本要素有
By1929,MickeyMousewasaspopular______childrenasCoca-cola.
A、wantingtodestroyEurope’swelfarestate.B、destroyingcapitalismacrossthecontinent.C、encouragingpoliticalintegrationa
最新回复
(
0
)