首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
数列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
27
问题
数列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://jikaoti.com/ti/vYy0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设有如下数组定义语句:Dimaa(一1T04,3)AsInteger以下叙述中正确的是()。
窗体上有一个名称为CDl的通用对话框控件和由四个命令按钮组成的控件数组Commandl,其下标从左到右分别为0、l、2、3,窗体外观如图所示。命令按钮的事件过程如F:PrivateSubCommandl_Click(IndexAsInteg
窗体上有一个名称为Commandl的命令按钮,其事件过程如下PrivateSubCommandl_Click()X=“VisualBasicProgramming”a=Right(X,11)b=Mid(X,7,5)
以下叙述中错误的是
对于含有多个窗体的工程而言,以下叙述中正确的是
设有以下定义语句:PrivateTypepointxAsIntegeryAsIntegerEndTVpeDimaAspoint下面语句中正确的是
为把圆周率的近似值3.14159存放在变量pi中,应该把变量pi定义为
下面语句中能够打开随机文件的是
在考生文件夹中有一个工程文件sjt5.vbp,如图6所示。运行程序时,从文件中读入矩阵数据并放入二维数组a中。单击“计算”按钮时,将统计矩阵两个对角线的元素中能被3整除的个数,统计结果显示在标签|b|First中;同时计算矩阵主对角线的元素之和,计算结果显
随机试题
二次谐波超声成像的基本原理是指
胸骨剑突末端与肚脐连线中点平面相当于
颈部MRA成像技术应用,下列错误的是
()做法对墙体抗震不利。
锅炉、压力容器、压力管道元件、起重机械、大型游乐设施的制造过程和锅炉、压力容器、电梯、起重机械、客运索道、大型游乐设施的安装、改造、重大维修过程,必须经国务院()核准的检验检测机构按照安全技术规范的要求进行监督检验。
经济基础理论认为,城市在发展过程的最初阶段是:
在下列命题中,包含辩证法思想的有
Theschoolauthority______againststudents’smokingbothintheclassroomsandathome.
OnehundredandthirteenmillionAmericanshaveatleastonebank-issuedcreditcard.Theygivetheirownersautomaticcreditin
Stereotypesaretroublesomebecausetheyareoftenindiscriminate,exhibitanallnessorientation,andcanproducefrozenevalu
最新回复
(
0
)