【SummationRecArray】
[code]inputs:PriceValueArray[MaxSize]( numericarray ),
Size( numericsimple ) ;
variables:
var0( 0 ) ;
var0 = 0 ;
for Value1 = 1 to Size
begin
var0 = var0 + Iff( PriceValueArray[Value1] <> 0, 1 / PriceValueArray[Value1], 0 ) ;
end ;
SummationRecArray = var0 ;
[/code]
页:
[1]