那位老师帮助编此语句,谢谢
那位老师帮助编此语句,谢谢a1,a2,a3,a4 共四个数值,求最大的一个数值与最小的一个数值的比,多谢.
[ 本帖最后由 青岛阿杜 于 2010-1-22 11:03 编辑 ] max=a1
min=a1
for i=2 to 4
if a>max then max=a
if a<min then min=a
next i
number=max/min max=a1
min=a1
for i=2 to 4
if a>max then max=a
if a<min then min=a
next i
number=max/min 怎么回事?数组a怎么一发就变成a? A1 A2 A3 A4
RAT:(IF(IF(A1<A2,A1,A2) >IF(A3<A4,A3,A4),IF(A1<A2,A1,A2) ,IF(A3<A4,A3,A4)))/(IF(IF(A1>A2,A1,A2) >IF(A3>A4,A3,A4),IF(A1>A2,A1,A2) ,IF(A3>A4,A3,A4)))
RAT:MIN(MIN(A1,A2),MIN(A3,A4))/MAX(MAX(A1,A2),MAX(A3,A4)) [ 是 ]被吞了 多谢老师多谢老师 {先求a1a2a3a4中的最大值}
aa:=if(a1>a2,a1,a2);{如a1大于a2,若是取a1,否取a2}
bb:=if(a3>a4,a3,a4);{如a3大于a4,若是取a3,否取a4}
cc:=if(aa>bb,aa,bb:;{取a1a2中大者和取得a3a4中大者相比,CC结果为a1a2a3a4中的最大值}
{再求a1a2a3a4中的最小值}
dd:=if(a1<a2.a1,a2);{如a1小于a2,若是取a1,否取a2}
ee:=if(a3<a4,a3,a4);{如a3小于a4,若是取a3,否取a4}
ff:=if(dd<ee,dd,ee);{取a1a2中小者和取得a3a4中小者相比,CC结果为a1a2a3a4中的最小值}
gg:cc/ff;{a1a2a3a4中的最大值与a1a2a3a4中的最小值之比}
--------------------------
不知是否更通俗易懂#*29*# 同志们
对于什么都不肯学
只想要现成的人而言
迁就他是害他
建议你给他个教程网址 MAX(MAX(A1,A2),MAX(A3,A4))/MIN(MIN(A1,A2),MIN(A3,A4));
页:
[1]