- UID
- 2
- 积分
- 2892887
- 威望
- 1396475 布
- 龙e币
- 1496412 刀
- 在线时间
- 13326 小时
- 注册时间
- 2009-12-3
- 最后登录
- 2024-12-26
|
【SortHeapArray】
- inputs:
- MyArray[MaxSize]( numericarrayref ),
- int Size( numericsimple ),
- int Order( numericsimple ) ;
- variables:
- int var0( 0 ),
- var1( false ) ;
- if Size > 1 then
- begin
- for var0 = IntPortion( Size / 2 ) downto 1
- begin
- MyArray[0] = MyArray[var0] ;
- var1 = HeapSift( MyArray, var0, Size, Order ) ;
- end ;
- for var0 = Size downto 2
- begin
- MyArray[0] = MyArray[var0] ;
- MyArray[var0] = MyArray[1] ;
- var1 = HeapSift( MyArray, 1, var0 - 1, Order ) ;
- end ;
- end ;
- SortHeapArray = true ;
复制代码 |
论坛官方微信、群(期货热点、量化探讨、开户与绑定实盘)
|