新编Visual FoxPro 程序设计实用教程 vfp第12周讲稿.ppt

《新编Visual FoxPro 程序设计实用教程 vfp第12周讲稿.ppt》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、教学目的与要求掌握数组用法数组的定义格式:DIMENSION

2、DECLARE<数组名>(下标1[,下标2])例如：DIMEA(3),B(2,3)说明:下标数目决定数组元素的个数，每个数组元素都是一个内存变量。数组元素的顺序:按下标从小到大(二维先按行,后按列)。同一个数组的数组元素可以有不同的数据类型，初始值都为逻辑.F.。数组例题用数组实现输入10个数,输出其中最大的数258912310411A(1)A(2)A(3)A(4)A(5)A(6)A(7)A(8)A(9)A(10)M算法:1.定义数组A并将10

3、个数存到数组A中2.M=A(1)3.FORI=2TO104.循环体内比较A(I)和M,若A(I)>M,则将A(I)赋给M5.输出MM用来存放最大数数组例题用数组实现输入10个数,输出其中最大的数DIMEA(10)FORI=1TO10INPUTTOA(I)ENDFORM=A(1)FORI=2TO10IFA(I)>MM=A(I)ENDIFENDFOR?M输出最大数及其下标呢？数组例题用数组存放FIB数列,并输出前40项,5个一行DIMEFIB(40)STORE1TOFIB(1),FIB(2)FORI=3TO4

4、0FIB(I)=FIB(I-1)+FIB(I-2)ENDFORFORI=1TO40??FIB(I)IFI%5=0?ENDIFENDFOR数组例题表单实现显示FIB数列的前40项（使用编辑框显示）。数组例题用数组实现输入10个数，输出超过平均值的数的个数。思路：先求出平均值，再用循环统计超过平均值的个数。数组例题设计如下表单，单击“输出”命令按钮，在一个编辑框内显示一个10X10的矩阵，该矩阵主对角线和次对角线的元素都为1，其余元素都为0。单击退出按钮关闭表单。数组例题用3×3二维数组实现输入9个数，输出其

5、中最大数及其行列下标。作业实验十二