例7-10.prg

来自「几个VFP程序实例」· PRG 代码 · 共 13 行

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