[求助]冒泡法升序无值，谢谢 - 金字塔软件问题提交 - 金字塔客服中心 - 专业程序化交易软件提供商

金字塔客服中心 - 专业程序化交易软件提供商 → 金字塔软件 → 金字塔软件问题提交 → [求助]冒泡法升序无值，谢谢

欢迎使用金字塔普通技术服务论坛，您可以在相关区域发表技术支持贴。
我司技术服务人员将优先处理 VIP客服论坛 服务贴，普通区问题处理速度慢，请耐心等待。谢谢您对我们的支持与理解。

共有5025人关注过本帖平板打印复制链接主题：[求助]冒泡法升序无值，谢谢

ENK

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：新手上路帖子：86 积分：529 威望：0 精华：0 注册：2012/2/22 21:57:38

Post By：2012/4/6 22:19:53 [只看该作者]

variable:B[6]=0;

B[1]:=REF(C,1);
B[2]:=REF(C,2);
B[3]:=REF(C,3);
B[4]:=REF(C,4);
B[5]:=REF(C,5);
B[6]:=REF(C,6);

FOR I=1 TO (7-1) DO
BEGIN
FOR J=1 TO (7-1-I) DO
BEGIN
IF B[J]>B[J+1] THEN
BEGIN
T:=B[J];
B[J]:=B[J+1];
B[J+1]:=T;
END
END
END

请问,加个条件,只把大于当前收盘价的数组元素进行排升序,把不符合的数组元素排除或者放在数组的最后面

(这样保证排序后的数组前几个元素为满足条件的数组元素),应该怎么做,想了很久都没有想出来,谢谢

RSS2.0 | Xhtml无图版 | Xslt无图版 Powered By weistock 2012
页面执行时间 0.04688 秒, 5 次数据查询

主题：[求助]冒泡法升序无值，谢谢