主题：[求助]悬赏1个金币~求20个不等于0的数值求和..

我要找前面不等于0的20个数字~求个和值sum~怎么弄？

逐周期模式的...

f:=0;

addsum:=0;
for i=datacount downto 1 do
if not(flag[i]=0) then begin
addsum:=addsum+flag[i];
f:=f+1;//记录不为0的个数
end
if f=20 then break;

s_flag:addsum,linethick0;
=========================

这样好像不行

有些是序列模式的写法...需要转换回序列模式..

也可以把问题转换一下~

逐周期模式下

求满足前面最近20个不等于0的flag到当前的周期数...

哪位有好点的算法...？？