vfp如何求6个数的第二最大值和第二最小值,有6个数在0.1到9.9之间,如何求6个数的第二最大值和第二最小值,

来源:学生作业帮助网 编辑:作业帮 时间:2024/04/28 05:31:01
vfp如何求6个数的第二最大值和第二最小值,有6个数在0.1到9.9之间,如何求6个数的第二最大值和第二最小值,

vfp如何求6个数的第二最大值和第二最小值,有6个数在0.1到9.9之间,如何求6个数的第二最大值和第二最小值,
vfp如何求6个数的第二最大值和第二最小值,
有6个数在0.1到9.9之间,如何求6个数的第二最大值和第二最小值,

vfp如何求6个数的第二最大值和第二最小值,有6个数在0.1到9.9之间,如何求6个数的第二最大值和第二最小值,
local aNum[6]
local aD[6]
local i
** 下面六个数为举例,可自行替换
aNum[1]=0.2
aNum[2]=2.0
aNum[3]=3.9
aNum[4]=9.2
aNum[5]=1.4
aNum[6]=0.1
for i=1 to 6
aD[i]=0
endfor
for i=1 to 6
for j=1 to 6
if aNum[i]>aNum[j]
aD[i]=aD[i]+1
endif
endfor
endfor
for i=1 to 6
if aD[i]=4
"第二大是:"+str(aNum[i],4,1)
endif
if aD[i]=1
"第二小是:"+str(aNum[i],4,1)
endif
endfor

dimension a(6)
clear
for i=1 to 6
?"请输入第"+str(i,1)+"个数:"
input to a(i)
endfor
for i=1 to 5
for j=i+1 to 6
if a(i)>a(j)
t=a(i)
a(i)=a(...

全部展开

dimension a(6)
clear
for i=1 to 6
?"请输入第"+str(i,1)+"个数:"
input to a(i)
endfor
for i=1 to 5
for j=i+1 to 6
if a(i)>a(j)
t=a(i)
a(i)=a(j)
a(j)=t
endif
endfor
endfor
?"第二最大值是:",a(5)
?"第二最小值是:",a(2)
return

收起

vfp如何求6个数的第二最大值和第二最小值,有6个数在0.1到9.9之间,如何求6个数的第二最大值和第二最小值, vfp中求N个数的最大值和最小值不要用定义数组, VFP编程:斐波拉契数列,第一项为0,第二项为1,求前30项的和! 三个数的和等于15,第一个数减去第二个数的差等于第二个数减去第三个数的差,第二个数与第三个数的和比第一个数大1,求第三个数. 有5个数,最小的数是9,从第二个数起,每个数都比它前面一个数多6,这5个数的平均数是多少? 两个数的和是319,第一个数的末尾是0,如果把这个0去掉,就得到第二个数,求第二个数. 用vfp 做 求两个数的最大公约数和最小公倍数 程序 vfp设计一个程序,随机输入N个数,求它们的和 vfp中,怎么用表单求两个数的最大公约数和最小公倍数第四题 用vfp 做 求两个数的最大公约数和最小公倍数 程序 电子表格公式问题有两行数 求第一行数的最大值和第二大值 所对应在第二行的数比如A1=4 B1=3 C1=5 A2=2 B2=6 C2=7 第一行最大值是5 第二大值是4 对应在第二行的数就是 7 和 21楼这样解决也 三个数求最大值,VFP编程题!不要用Max函数! 第一题:试求可以分解为三个素数之积的最小三位数是多少?第二题:已知两个数的和是60,它们的最大公因数是15,试求这两个数. 连续八个数字1.2.3.4.5.6.7.8分两组,第一组分成三个数第二组五个数,求两倍的第一组等于第二组五个数和. VFP求200~300之间的所有素数的个数 四个数的和是180.第一个数是第二个数的2倍,第二个数是第三个数的2倍,第三个数是四个数的2倍,求这个数 四个数的和是180.第一个数是第二个数的2倍,第二个数是第三个数的2倍,第三个数是四个数的2倍,求这个数各是多少? 用VFP 求200~300之间所有素数的个数