vfp编程教程

『壹』 VFP怎么编程

clear
dime a(10)
for i=1 to 10
input to a(i)
endfor
max=a(1)
min=a(1)
for i=2 to 10
if max<a(i)
max=a(i)
endif
if min>a(i)
min=a(i)
endif
endfor
"10个数中最大数为："，max
"10个数中最i小数为："，min
return