填空题

已知数列的递推公式如下：
则按照递推公式可以得到数列1，1，2，3，5，8，13，21，34，55，…。现要求从键盘输入n值，输出对应项的值。例如当输入n为8时，应该输出34。程序如下，请补充完整。 Private Sub run1_Click() f0=1 f1=1 num=Val(Input Box("请输入一个大于2的整数：")) For n=2 To (12) f2= (13) f0=f1 f1=f2 Next n MsgBox f2 End Sub

【参考答案】

(12) num (13) f0+f1

<上一题目录下一题>

热门试题

填空题

现有用户登录界面如下：窗体中名为username的文本框用于输入用户名，名为pass的文本框用于输入用户的密码。用户输入用户名和密码后，单击“登录”名为login的按钮，系统查找名为“密码表”的数据表，如果密码表中有指定的用户名且密码正确，则系统根据用户的“权限”分别进入“管理员窗体”和“用户窗体”：如果用户名或密码输入错误，则给出相应的提示信息。密码表中的字段均为文本类型，数据如下图所示。单击“登录”按钮后相关的事件代码如下，请补充完整。Private Sub login_Click()Dim str As StringDim rs AS New ADODB.RecordsetDim fd As ADODB.FieldSet en=CurrentProjeet.Connectionlogname=Trim(Me!username)pass=Trim(Me!pass)If Len(Nz(logname))=0 ThenMsgBox 请输入用户名 Else If Len(Nz(pass))=0 ThenMsgBox 请输入密码 Elsestr= select * from密码表where用户名= &logname& and密码= &passrs.Open str，cn，adopenDynamic，adLockOptimistic，adCmdTextIf (14) ThenMsgBox 没有这个用户名或密码输入错误，请重新输入 Me.username= Me.pass= ElseSet (15) =rs.Fields( 权限 )If fd= 管理员 ThenDoCmd.CloseDoCmd.OpenForm 管理员窗体 MsgBox 欢迎您，管理员 ElseDoCmd.CloseDoCmd.OpenForm 用户窗体 MsgBox 欢迎使用会员管理系统 End IfEnd IfEnd IfEnd Sub

填空题

在窗体中添加一个名称为Command1的命令按钮，然后编写如下事件代码:Private Sub Command1_Click()Dim x As Integer，y As Integerx=12:y=32CaU p(x，y)MsgBox x * yEnd SubPublic Sub p(n As Integer，ByVal m As Integer)n=n Mod 10m=m Mod 10End Sub窗体打开运行后，单击命令按钮，则消息框的输出结果为______。

相关试题