找答案的高端用户(找答案钻石及双钻级别的用户)将尽可能从此问题下的所有回
答中,为您推荐最佳答案。届时您可以根据推荐数采纳答案。
如果自提问时间起7天内您仍无法选出最佳答案,您可以选择“无满意答案”关闭此问题。
{{itemCategory}}
手机扫码追踪该问题,
觉得实用,立即去分享!
点击复制链接
1、数据定义
定义数组1 含4个泵运行时间,比如数组名为 A,数组下标从1开始,用于存储泵的运行时间,运行时间为整数,时间单位你可以自已定。
其中: A[1] 记录 1 号泵的运行时间;
A[2] 记录 2 号泵的运行时间;
A[3] 记录 3 号泵的运行时间;
A[4] 记录 4 号泵的运行时间;
数组元素的值对应的是每一个泵的运行时间。
定义数组2 含4个泵运行时间,比如数组名为 B,数组下标从1开始,真正用于按运行时间排序的数组。
定义数组3 含4个泵泵号,比如数组名为 C,数组下标从 1 开始.。按时间排序的泵号就存在这里。
其中:C[1] 是运行时间最少的泵的泵号;
C[2] 是运行时间第二少的泵的泵号;
C[3] 是运行时间第三少的泵的泵号;
C[4] 是运行时间最长的泵的泵号;
排序条件成立变量;
2、排序条件成立时:
2.1 先将A数组复制到 B 数组,可以利用 FOR 循环一个一个复制,目的是使用 B 数组进行排序,而 A 数组保持原样;利用 FOR 循环,初始化 C 数组
//排序前的准备
FOR #I := 1 TO 4 BY 1 DO
"数据块_1".B[#I] := "数据块_1".A[#I];
"数据块_1".C[#I] := #I;
END_FOR;
2.2 用冒泡排序的方法,排序,排完序后,C[1]、C[2] 就是要找的泵号了。
//开始排序
FOR #I := 1 TO 3 BY 1 DO
FOR #J := #I+1 TO 4 BY 1 DO
IF "数据块_1".B[#I] > "数据块_1".B[#J] THEN
//时间交换
#TEMP := "数据块_1".B[#I];
"数据块_1".B[#I] := "数据块_1".B[#J];
"数据块_1".B[#J] := #TEMP;
//泵号交换
#TEMP := "数据块_1".C[#I];
"数据块_1".C[#I] := "数据块_1".C[#J];
"数据块_1".C[#J] := #TEMP;
END_IF;
END_FOR;
END_FOR;
3、完整的程序,及测试图
首次回答问题,获得
双倍西币积分!
立即成为技术知识分享的一员!
找答案微信小程序
提问
搜索
欢迎您访问支持中心!
丰富的视频,全方位的文档,大量的网友交流精华……
为了更好的完善这些内容,我们诚邀您在浏览结束后,花20秒左右的时间,完成一个用户在线调查!
感谢您的支持!