例7-10.prg

几个VFP程序实例

input "请输入一个数：" to a
ma=a
mi=a
for i=1 to 10
    input "请输入一个数：" to a
    if ma<a
      ma=a
    endif
    if mi<a
       mi=a
    endif
endfor
? ma,mi