Question

vfp6.0 输入10个数，找出最大值与最小值？

Answer 1

CLOSE ALL
CLEAR ALL
CLEAR
SET TALK OFF
RAND(-1)
DIMENSION aa(10) AS numeric
?
?"随机生成十个数："
?
?
FOR i = 1 TO 10
aa(i) = INT(RAND() * 100) + 1
??aa(i)
NEXT
= ASORT(aa)
?
?
?"最大随机数："
?
?aa(10)
?
?
?"最小随机数："
?
?aa(1)
SET TALK ON

Answer 2

clear
dime a(10)
for i=1 to 10
input "请输入一个数：" to a(i)
endfor
?"降序排列为："
for i=1 to 9
for j=i+1 to 10
if a(i)<a(j)
k=a(i)
a(i)=a(j)
a(j)=k
endif
endfor
??alltrim(str(a(i)))+" "
endfor
??alltrim(str(a(i)))

Answer 3

你先在“表设计器”中建立索引，然后单击“表”菜单中的“属性”命令，在对话框中按“索引顺序”排序。