求一个VFP程序
发布网友
发布时间：2024-10-23 18:24
共1个回答
热心网友
时间：2024-11-01 19:42
要求还挺多,呵
你那个两端大中间小,得有个主次把?比如最大得放前面还是后面,我给你个现成得排序程序,你自己修改把
*这个是原来有的,不是输入得,要输入你用input即可
clear
dimension a(10)
a(1)=142
a(2)=120
a(3)=452
a(4)=23
a(5)=
a(6)=42
a(7)=865
a(8)=140
a(9)=453
a(10)=147
*原来得顺序
for rr=1 to 10
?a(rr)
endfor
for bb=9 to 1 step -1
for aa=1 to bb
xxx=a(aa)
if a(aa)<a(aa+1)
a(aa)=a(aa+1)
a(aa+1)=xxx
endif
endfor
endfor
?
?
*重排后顺序
for rr=1 to 10
?a(rr)
endfor
*反方向显示(并没改变数组内容),反正他要的是显示结果把
for rr=1 to 10
?a(rr)
endfor
至于两头大中间小的,你把程序改改呗,不过先得弄明白这个程序,那个能麻烦一点点
