实验六--顺序和分支结构程序设计

实验六实验六 顺序和分支结构程序设计顺序和分支结构程序设计 一 实验目的要求 一 实验目的要求 1 掌握建立 编辑和调用程序文件的方法 2 掌握常用输入 输出命令 input accept wait 语句 read 语句 的使用方法 3 掌握单向分支 双向分支和多路分支程序设计的方法 二 实验内容 二 实验内容 1 建立 编辑和调用程序文件 2 练习常用输入 输出命令 input accept wait 语句 read 语句 3 单向分支语句 if endif 程序设计和双向分支语句 if else endif 程序设计 4 多路分支语句 Do Case 程序设计 三 实验指导 三 实验指导 实验实验 6 1 用命令方式显示用命令方式显示 员工员工 表中的全部数据 并逻辑删除第表中的全部数据 并逻辑删除第 5 条记录 条记录 具体操作步骤如下 1 在 命令 窗口中输入并执行以下命令 use 员工 dbf Exclusive Browse Last Delete Record 5 2 操作结果如图 6 1 所示 图 6 1 实验实验 6 2 用菜单方式显示用菜单方式显示 员工员工 表中的全部数据 并逻辑删除第表中的全部数据 并逻辑删除第 5 条记录 条记录 操作步骤如下 1 在命令窗口依次输入并执行以下命令 close all recall all 2 在 Visual FoxPro 主菜单下 选择菜单 文件 打开 进入 打开 窗口 3 在 打开 窗口中 选择 员工 表 按 打开 按钮 返回 Visual FoxPro 主 菜单 4 在 Visual FoxPro 主菜单下 选择菜单 显示 浏览 进入表 浏览 窗 口 5 在表 浏览 窗口中 选择菜单 表 删除记录 进入 删除 对话框 6 在 删除 对话框的 作用范围 下拉框中 选择 Record 5 按 删除 按 钮 返回表 浏览 窗口 表中的第 5 条记录被加上了删除标记 如图 6 2 所示 图 6 2 实验实验 6 3 用程序方式显示用程序方式显示 员工员工 表中的全部数据 并逻辑删除第表中的全部数据 并逻辑删除第 5 条记录 条记录 操作步骤如下 1 先在 命令 窗口中依次输入以下命令并执行 close all recall all 2 选择 文件 新建 程序 创建以 L10 4 prg 为名的程序文件 程序文件内容如下 Use 员工 dbf Exclusive Browse Last Delete Record 5 Browse Last 3 利用菜单方式或命令方式运行程序文件 L10 3 prg 程序一旦执行 系统将会逐条地执行每一个操作命令 完成显示 员工 表中的全部 数据 并逻辑删除第 5 条记录 实验实验 6 4 建立和编辑一个以建立和编辑一个以 L10 4 prg 为名的程序文件 程序的功能是先显示为名的程序文件 程序的功能是先显示 员员 工工 表中的全部数据 再显示物业部员工的数据 表中的全部数据 再显示物业部员工的数据 1 先在 命令 窗口中依次输入以下命令并执行 close all recall all 2 选择 文件 新建 程序 创建以 L10 4 prg 为名的程序文件 程序文件的内容如下 use 员工 dbf exclusive browse last list all for 所属部门 物业部 方法一 在 命令 窗口中建立和编辑 L10 4 prg 程序文件的操作方法如下 1 在命令窗口中 输入命令 Modify Command L10 4 prg 进入程序文件编辑窗口 如图 6 3 所示 图 6 3 2 在 程序文件 编辑窗口中逐条输入程序命令行 然后单击关闭按钮 保存程序 文件 结束程序文件建立和编辑的操作 如图 6 4 所示 图 6 4 方法二 在 文件 菜单下建立和编辑程序文件的操作方法如下 1 选择 文件 新建 命令 进入 新建 窗口 2 在 新建 窗口中选择 程序 单选钮 再单击 新建文件 按钮 进入 程序 文件 编辑窗口 如图 6 5 所示 图 6 5 3 在 程序文件 编辑窗口 逐条输入程序命令行 然后单击关闭按钮 保存程序 文件 结束程序文件建立和编辑的操作 如图 6 6 所示 图 6 6 实验实验 6 5 设计一个程序 能够查找设计一个程序 能够查找 员工员工 表中给定表中给定 姓名姓名 的记录 的记录 具体操作步骤如下 1 创建程序文件 L10 6 prg 如图 6 7 所示 图 6 7 2 运行程序 结果如下图所示 再次运行程序 结果如下图所示 实验实验 6 6 设计一个程序 能够分别浏览设计一个程序 能够分别浏览 房屋房屋 表中不同分布区域的入住情况记录集 表中不同分布区域的入住情况记录集 具体操作步骤如下 1 创建程序文件 L10 7 prg 内容如图 6 8 所示 图 6 8 2 运行 3 次程序 结果如下图所示 实验实验 6 7 修改修改 业主业主 表中的数据 把输入的房号的业主姓名改为表中的数据 把输入的房号的业主姓名改为 李红卫李红卫 具体操作步骤如下 1 创建程序文件 L10 11 prg 内容如图 6 9 所示 图 6 9 2 运行程序 结果如图 6 10 所示 图 6 10 实验实验 6 8 在在 业主业主 表中查找姓名为表中查找姓名为 李卫红李卫红 的记录 如果找到 则把该记录加上的记录 如果找到 则把该记录加上 删除标记 没有找到则提示信息删除标记 没有找到则提示信息 查无此人查无此人 具体操作步骤如下 1 创建程序文件 L10 12 prg 内容如图 6 11 所示 图 6 11 2 运行程序 结果如下图所示 实验实验 6 9 在在 员工员工 表中分别查找表中分别查找 所属部门所属部门 为物业部 保安部和财务部的记录集 为物业部 保安部和财务部的记录集 具体操作步骤如下 1 创建程序文件 L10 13 1 prg 内容如图 6 12 所示 图 6 12 2 运行程序 结果如图 6 13 所示 图 6 13 实验实验 6 10 分支语句程序设计 根据下列公式计算行李超重罚款分支语句程序设计 根据下列公式计算行李超重罚款 G 其中行李重量 其中行李重量 T 从键盘从键盘 输入 输入 编程如下 PR3 1 PRG SET TALK OFF INPUT 请输入行李的重量 TO T IF T 50 G T 1 2 E