以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://weistock.com/bbs/index.asp)
--  公式模型编写问题提交  (http://weistock.com/bbs/list.asp?boardid=4)
----  返回最接近数组里某个数的值  (http://weistock.com/bbs/dispbbs.asp?boardid=4&id=98120)
--  作者：1127aaa
--  发布时间：2016/6/2 4:09:11
--  返回最接近数组里某个数的值
variable:a[5]=0;
a[1]=1;
a[2]=5;
a[3]=7;
a[4]=10;
a[5]=15;

想实现这么一个逻辑，返回close最接近数组里的数字。后面不知道怎么写好。
比如close=3，则返回5；
close>3,<5，则返回5；
close=8，返回7。
--  作者：jinzhe
--  发布时间：2016/6/2 9:19:48
--  

n:=10000;

for i=1 to5 do begin

   if abs(c-a[i])<n then n:=a[i];

end

 

n的值就是了