实验十三 程序控制结构.doc

《实验十三 程序控制结构.doc》由会员上传分享，免费在线阅读，更多相关内容在应用文档-天天文库。

1、实验十三 程序控制结构一、实验目的   1．掌握VFP的3种基本控制结构   2．进一步掌握程序的设计、编程、调试、运行   3．学会编写简单的VFP程序4．灵活运用3种基本控制结构　二、预备知识   （一）VFP中几条较为简单的语句为：   1．清屏语句CLEAR   2．内存变量接收语句   ACCEPT[指定提示信息]TO内存变量名   3．内存变量输入语句   INPUT[指定提示信息]TO内存变量名   4．输出语句   ?

2、??[指定显示表达式][指定显示内容在屏幕上绝对列坐标或窗口中的相对列坐标][指定显示的其他表达式]……　   （二）VFP有3种基本控制结构：顺

3、序结构、分支结构、循环结构。其中的分支结构有选择分支结构（IF-ELSE-ENDIF）、结构分支语句（DO-CASE-ENDCASE）；循环结构有条件循环（DOWHILE-ENDDO）、步长循环（FOR-ENDFOR）、扫描循环（SCAN-ENDSCAN）。　   （三）VFP中的数组类型的使用。   数组的定义格式为：DIMENSION

4、DECLARE<数组名>(<下标1>[，<下标2>])[，<数组名>(<下标1>[，<下标2>])……]，规定其下标的下界从1开始；赋值的命令格式为：STORE<表达式>TO<数组名>或<数组名>=<表达式>，规定每个数组元素的初值为.F.，各

5、元素在内存中按行的顺序存储；数组变量的显示命令格式为LIST/DISPLAYMEMORY。　   三、实验内容   1．编写乘法口诀表。   2．求二维数组对角线数据之和    程序说明：将16个正整数按如下方阵存入数组X（4，4）中：    15913    261014    371115    481216    求出主对角线上元素X（1，1）、X（2，2）、X（3，3）、X（4，4）之和存入内存变量Z1，再求出另一条对角线上元素X（1，4）、X（2，3）、X（3，2）、X（4，1）之和存入内存变量Z2；    说明：这里最主要的是要找出数组和二条对角线的规律    四、实

6、验步骤    （一）乘法口诀表    1．启动VFP6.0    2．在命令窗口内输入modicommtest3    3．在弹出的文本编辑窗口中输入以下test3.prg程序    **test3.prg    clea    i=1    dowhilei<=9        j=1        dowhilej<=9           ifj<=i              ??str(i,1),'*',str(j,1),'=',str(i*j,2),''           endif            j=j+1        enddo       ?    

7、   i=i+1    enddo    4．输入完保存后运行    5．显示运行结果    （二）按（一）步骤，输入以下test4.prg程序，保存后运行。显示运行结果为z1=z2=34。    **test4.prg    clea    settalkoff    dimensionx(4,4)    w=0    j=1    dowhilej<=4        i=1        dowhilei<=4           w=w+1           x(i,j)=w&&给数组赋值           i=i+1        enddo        j=j+

8、1    enddo    store0toz1,z2    i=1    dowhilei<=4        j=1        dowhilej<=4          ifi=j             z1=z1+x(i,j)&&第一组对角线之和          endif           ifj=5-i             z2=z2+x(i,j)&&第二组对角线之和           endif           j=j+1        enddo        i=i+1    enddo    ?"z1=",z1    ?"z2=",z2   

9、 settalkon