实 验 报 告

实验目的:
(1)掌握Sub过程定义和调用
(2)理解变量和过程的作用域
实验内容:
【实验7-1】编写一Sub过程,求斐波那契(Fibonacci)数列的前n项数据。单击命令按钮输入n值,调用该过程,在窗体中输出,每行输出5个数据。(Fibonacci数列第一项是1,第二项是1,以后各项都是前两项的和,即数列值为:1、1、2、3、5、8、13……)
提示:用数组作为过程参数
(1)程序代码
Option Base 1
Private Sub Command1_Click()
Dim n%, x%, i%, a&(), j%
n = Val(InputBox("请输入Fibonacci数列项数n"))
Print "Fibonacci数列前" & n & "项为:"
x = 0
ReDim a(n)
For i = 1 To n
Call test(i, a())
Print Format(a(i), "!@@@@@@@@@@");
x = x + 1
If x Mod 5 = 0 Then Print
Next i
End Sub
Private Sub test(j%, b&())
If j = 1 Then
b(1) = 1
ElseIf j = 2 Then
b(2) = 1
Else
b(j) = b(j - 1) + b(j - 2)
End If
End Sub
实验七 - 实验七 学号: 学号:31 姓名: 姓名:于强 1. 下面列出了打印文件时的工作流: 用户通过计算机指定要打印的文件。 打印服务器根据打印机是否空闲,操作...
实验七 胰岛素过量反应及其解救、 普萘洛尔的抗缺氧作用 【实验目的】 1、观察普萘洛尔提高动物对缺氧耐受力的作用,了解用小鼠进行耐缺氧的实验 方法 2、观察...
实验7 暂无评价0人阅读0次下载举报文档实验二γ 射线的吸收与物质吸收系数μ 的测定 一.实验目的 1.了解γ 射线与物质相互作用的特性 2.了解窄束...
实验七_理学_高等教育_教育专区。实验七 底物浓度对酶活性对影响 ——蔗糖酶米氏常数对测定 蔗糖酶米氏常数对测定 Experiment7 Effect of Substrate Concentration on...
(1)查询结果 (2)查询结果 实验7 数据查询 (3)查询姓李的学生的姓名、学号和性别 (4)查询名字中第2个字为“明”字的男学生的姓名和系名 (3) 查询结果 (...
实验项目名称:离散线性时不变系统的分析 实验成绩: 实验日期: 2015.6.27 实验室: 6404 实验七:离散线性时不变系统的分析 实验学时:2 实验类型:综合 实验要求...
实验7_学习总结_总结/汇报_应用文书。实 验报 告 课程名称 实验项目 实验仪器 实验仪器 数据库原理及应用 数据库原理及应用实验 计算机、Office 套件 系专 别_...
实验七 时分复用数字基带通信系统 一、实验目的 1.掌握时分复用数字基带通信系统的基本原理及数字信号传输过程。 2.掌握位同步信号抖动、帧同步信号错位对数字信号...
实验7:查找算法的设计与实现序号:15 试验编号:7 难度等级:A 实验名称:查找算法的设计与实现 一.需求分析用 C 语言实现各种查找算法的想法来源于生活和工作中的...
2012-2013 学年上学期 2012 年 11 月 实验 7 一、实验目的 函数的定义与调用 1、能根据问题正确确定函数的类型 2、掌握求值类函数的编写与调用 3、掌握判断...
实验7(1) 暂无评价 2页 免费 喜欢此文档的还喜欢 实验8 4页 2下载券 商业...{ 1, 3, 5, 7, 9, 11, 13, 15}, *p = a + 5; for(j = 3; ...
现代电子技术实验 模11计数器 Q3Q2 Q1Q0 2、74X163用作模11计数器. 现代电子技术实验 (1)输入端CLK接1HzTTL信号, 输出 端RCO Q3 Q2 Q1 Q0接LED指示灯...

我要评论