以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://weistock.com/bbs/index.asp)
--  公式模型编写问题提交  (http://weistock.com/bbs/list.asp?boardid=4)
----  关于数组的问题  (http://weistock.com/bbs/dispbbs.asp?boardid=4&id=88192)

--  作者:zxsd
--  发布时间:2015/12/8 11:09:02
--  关于数组的问题
 请问,怎样得出一个数组中有几个相同的值?比如有几个1?
--  作者:wenarm
--  发布时间:2015/12/8 11:23:45
--  
VARIABLE:a[5]=0;
b:0;
a[1]:=2;
a[2]:=1;
a[3]:=2;
a[4]:=2;
a[5]:=4;
for n=1 to 5 do
begin
 if a[n]=4 then b:=b+1;
 
end