实验十一单重循环结构程序设计.doc

实验十一　单重循环结构程序设计 11.1 实验目的 (1)掌握循环算法的基本思想和程序设计方法。 (2)掌握Visual FoxPro提供的三种循环结构。 (3)掌握计数器、累加器、遍历表记录等编程方法。 11.2 实验任务 (1)掌握Visual FoxPro程序提供的三种循环do while、for和scan语句的结构、执行规则和使用方法。 (2)掌握计数器i=i+1. 累加器s=s+i、累乘器s=s*i的含义与使用方法。 (3)掌握一个整数被某数整除的概念，从而进一步求某数是否为质数（素数）。 (4)掌握取整函数int和求余函数mod的使用技巧和方法。 (5)掌握locate/continue和seek/skip命令在数据库表编程中的使用技巧和方法。 11.3 实验预备知识 (1)了解顺序和选择程序的编程方法。 (2)了解循环语句的使用方法。 (3)了解循环语句结构的表达方式和执行规则。 (4)了解可确定循环次数与不可确定循环次数在编程中的差异。 11.4 实验内容与步骤 11.4.1 设置文件路径 1. 在C磁盘根目录下建立一个工作文件夹mywork，该文件夹用于存放试验用的所有数据和程序文件，将所建的关于教学管理的四张表及相关数据库拷贝到该目录的“教学数据库”文件夹下，以前所建的程序文件放在MyWork文件夹下。 2. 启动Visual FoxPro6.0，在命令窗口输入命令。 图11-1 设置缺省路径 11.4.2 创建不与数据库有关的程序文件 1. 实例1 求1加到16的数据和，即 S=1+2+3+……+16。 操作过程： (1)新建一个程序文件test08.prg，在命令行输入modify command test08 ，按回车键，出现程序文件编辑窗口，按图11-2所示test08.prg的内容输入。 (2)输入完程序后，保存该文件。 (3)在命令窗口输入do test08，按回车键，系统运行该程序，运行结果如下。 　　　　　 图11-2 test08.prg输入界面　　　　　 test08.prg输入界面 实验中请特别注重理解test08.prg程序中的DO WHILE－ENDDO结构及该结构的执行规则，掌握累加求和算法的基本技巧。 为了更好地理解DO WHILE－ENDDO结构,可以按下列的方法跟踪程序的执行。 (4)在Visual FoxPro主窗口上方的菜单中选择“工具”→“调试器”，进入到“Visual FoxPro调试器”界面。 (5)在“Visual FoxPro调试器”界面的“文件”菜单中选择“打开”命令或在工具栏中点击“打开”工具条，在“添加”窗口选择C:\MyWork文件夹中的test08.prg程序。 (6)在“Visual FoxPro调试器”界面中关闭“监视”、“堆栈调用”和“调试输出”窗口，仅保留“跟踪”窗口和“局部”窗口，在“Visual FoxPro调试器”界面可以移动窗口使之整齐。在“跟踪”窗口的“CLEAR”语句的左侧双击鼠标，使之出现一个红色的圆点。 (7)按F6键进行“单步”执行（单击“单步”工具条或从“调试”菜单中选择“单步”），可以看到图11-3所示的结果（程序行的左侧有黄色的箭头）。 (8)根据需要不断地按F6键进行“单步”跟踪，可以在“局部”窗口查看并分析变量值的变化过程。请特别关注和理解程序行左侧黄色的箭头在DO WHILE－ENDDO结构中的跳转过程。 (9)从文件菜单或关闭窗口的方法退出“Visual FoxPro调试器”界面。 该题还可以按图11-4所示的test09.prg方法来求解。 图11-4 test09.prg输入界面 实验中请特别注重理解test09.prg程序中的for－endfor结构及该结构的执行规则。为了更好地理解for－endfor结构,可以按test08.prg相同的方法打开“Visual FoxPro调试器”，点击工具条上的圆点（取消）可取消原有程序。打开test09.prg程序进行单步跟踪。 注意test09.prg与 test08.prg中累加求和算法的不同之处，正确认知不同结构中的循环控制变量。 (10)修改程序test08.prg，使其成为求解 1到100之间的奇数和，即S=1+3+5+……+99，并另存为test08_1.prg。执行test08_1.prg程序，试求解结果。 (11)修改程序test09.prg，使其成为求解 1到100之间的偶数和，即S=2+4+8+……+100，并另存为test09_2.prg。执行test09_2.prg程序，试求解结果。 2. 实例2 从键盘上输入10个数，统计这10个数之和，并求出其中能被2整除（即偶数）的数的个数。 操作过程： (1)新建一个程序文件test1