如何从数组中查找最接近500的数字！

zhangfenyun

   假如有一个数值，里面的数字都是按照大小排列好了的！

    数值A里面的值有：250  300 350 400 450  600 700 800

   要赋予一个值给函数B,但是这个值必须不能大于500！可以等于500 （这个实例就是给函数B为450）


   1,首先判断这个数组里面有没有500，如果有，那么函数B赋予500

   2,再判断这个数组里面有没有450，如果有，那么函数B赋予450


   3,再判断这个数组里面有没有400，如果有，那么函数B赋予400

  4,再判断这个数组里面有没有350，如果有，那么函数B赋予350

  5,再判断这个数组里面有没有300，如果有，那么函数B赋予300
  6,再判断这个数组里面有没有250，如果有，那么函数B赋予250

  7,最后判断：如果这个数组里面所有的值都大于500，那么就函数B赋予500

  1,2,3,4,5,6,7点问题依次去判断

zhangfenyun

  高！！！   佩服大家

zhangfenyun

佩服大家！我也是新学的！我的QQ:251546505

想跟大家一起学习

zhangfenyun

是啊

谢谢大家，问题是那样的！

zhangfenyun

说白 了，是取距离500最近的值呀？可以是500，但是不能超过500

zhangfenyun

#!/usr/bin/perl
@a=(1,400,500,600,700,800,900);
foreach $tmp (@a){
    $p=($tmp<500)?$tmpp
}
$t=($p)?$p:500;
print $t;   #为什么是400