VFP中的数组（二）

1、4.改写上面的最大值程序MX.PRG，使其功能变为求数组中元素的最小值。

将MX.PRG中的max用min替代后，只要改写下面的部分，其他语句不变。

   If min>N[k]            &&依次与后面的元素比较

min=N[k]         &&将遇到的较小元素值保存在min变量中

   Endif

5.求ZGDA.DBF表中年龄的最大值，并输出年龄最大的那一条记录。

Use ZGDA

MAX=年龄

Do while not eof()

skip 

If  MAX>年龄

MAX=年龄     &&将遇到的较大年龄值保存在max变量中

RN= recno()    &&保存记录号

Endif

Enddo

?  “年龄的最大值是”，MAX