vlambda博客
学习文章列表

西门子SCL高级语言教程—冒泡排序和选择排序


01

视频教程-冒泡排序

西门子SCL高级语言教程—冒泡排序和选择排序

Replay Share Like

0/0

进度条,百分之0
00:00
/
30:59
30:59
全屏

继续观看

西门子SCL高级语言教程—冒泡排序和选择排序

转载
,
西门子SCL高级语言教程—冒泡排序和选择排序
自动化小白


02

冒泡排序

西门子SCL高级语言教程—冒泡排序和选择排序
西门子SCL高级语言教程—冒泡排序和选择排序

冒泡排序是一种简单的排序算法。它重复地走访过要排序的数列,一次比较两个元素,如果它们的顺序错误就把它们交换过来。走访数列的工作是重复地进行直到没有再需要交换,也就是说该数列已经排序完成。这个算法的名字由来是因为越小的元素会经由交换慢慢“浮”到数列的顶端。

2.1 算法描述

  • 比较相邻的元素。如果第一个比第二个大,就交换它们两个;

  • 对每一对相邻元素作同样的工作,从开始第一对到结尾的最后一对,这样在最后的元素应该会是最大的数;

  • 针对所有的元素重复以上的步骤,除了最后一个;

  • 重复步骤1~3,直到排序完成。

2.2 动图演示

西门子SCL高级语言教程—冒泡排序和选择排序

2.3 代码实现

西门子SCL高级语言教程—冒泡排序和选择排序

西门子SCL高级语言教程—冒泡排序和选择排序

西门子SCL高级语言教程—冒泡排序和选择排序

VAR MAX_MIN : BOOL;MIN_MAX : BOOL;MAX_MIN2 : BOOL;MIN_MAX2 : BOOL;BUFFER : ARRAY[1..10] OF INT ;_TEMP : INT;i : INT;h : INT;R : R_Trig;R1 : R_Trig;END_VAR
//**************冒泡排序方式********************* R(CLK := MAX_MIN); R1(CLK := MIN_MAX); //从大到小 IF R.Q THEN FOR h := 1 TO 10 DO FOR i := 1 TO 10 DO IF BUFFER[I] < BUFFER[I + 1] THEN _TEMP := BUFFER[I]; BUFFER[I] := BUFFER[I + 1]; BUFFER[I + 1] := _TEMP; END_IF; END_FOR; END_FOR;END_IF;
//从小到大 IF R1.Q THEN FOR h := 1 TO 10 DO FOR I := 1 TO 10 DO IF BUFFER[I] > BUFFER[I + 1] THEN _TEMP := BUFFER[I]; BUFFER[I] := BUFFER[I + 1]; BUFFER[I + 1] := _TEMP; END_IF; END_FOR; END_FOR;END_IF;


03

选择排序

西门子SCL高级语言教程—冒泡排序和选择排序
西门子SCL高级语言教程—冒泡排序和选择排序

表现最稳定的排序算法之一,因为无论什么数据进去都是O(n2)的时间复杂度,所以用到它的时候,数据规模越小越好。唯一的好处可能就是不占用额外的内存空间了吧。理论上讲,选择排序可能也是平时排序一般人想到的最多的排序方法了吧。

选择排序(Selection-sort)是一种简单直观的排序算法。它的工作原理:首先在未排序序列中找到最小(大)元素,存放到排序序列的起始位置,然后,再从剩余未排序元素中继续寻找最小(大)元素,然后放到已排序序列的末尾。以此类推,直到所有元素均排序完毕。

3.1 算法描述

n个记录的直接选择排序可经过n-1趟直接选择排序得到有序结果。具体算法描述如下:

  • 初始状态:无序区为R[1…n],有序区为空;

  • 第i趟排序(i=1,2,3…n-1)开始时,当前有序区和无序区分别为R[1…i-1]和R(i…n)。该趟排序从当前无序区中-选出关键字最小的记录 R[k],将它与无序区的第1个记录R交换,使R[1…i]和R[i+1…n)分别变为记录个数增加1个的新有序区和记录个数减少1个的新无序区;

  • n-1趟结束,数组有序化了。

3.2 动图演示

西门子SCL高级语言教程—冒泡排序和选择排序


3.3 代码实现

西门子SCL高级语言教程—冒泡排序和选择排序

西门子SCL高级语言教程—冒泡排序和选择排序

VAR MAX_MIN : BOOL;MIN_MAX : BOOL;MAX_MIN2 : BOOL;MIN_MAX2 : BOOL;BUFFER : ARRAY[1..10] OF INT ;_TEMP : INT;i : INT;h : INT;R : R_Trig;R1 : R_Trig;  END_VAR
//******************选择排序***************************** R(CLK := MAX_MIN2); R1(CLK := MIN_MAX2); //从大到小 IF R.Q THEN FOR h := 1 TO 9 DO FOR i := h+1 TO 10 DO IF BUFFER[h] < BUFFER[I] THEN _TEMP := BUFFER[h]; BUFFER[h] := BUFFER[I]; BUFFER[I] := _TEMP; END_IF; END_FOR; END_FOR; END_IF; //从小到大 IF R1.Q THEN FOR h := 1 TO 9 DO FOR i := h+1 TO 10 DO IF BUFFER[h] > BUFFER[I] THEN _TEMP := BUFFER[h]; BUFFER[h] := BUFFER[I]; BUFFER[I] := _TEMP; END_IF; END_FOR; END_FOR; END_IF; END_FUNCTION_BLOCK

西门子SCL高级语言教程—冒泡排序和选择排序





西门子SCL高级语言教程—冒泡排序和选择排序
西门子SCL高级语言教程—冒泡排序和选择排序