回复:凌飞翼老师,那个冒泡排序的例子能否发我一份?

乐果

  • 帖子

    267
  • 精华

    1
  • 被关注

    8

论坛等级:游侠

注册时间:2007-03-14

普通 普通 如何晋级?

发布于 2011-11-27 13:55:15

5楼

FUNCTION FC4:VOID
Know_How_Protect

VAR_TEMP
// Temporary Variables
loop_count:INT;
index_1:INT;
index_2:INT;
Data_Store:ARRAY[0..5] OF INT;
T :INT;
N :INT;
END_VAR

// Statement Section

// Block Parameters

VAR_INPUT // Input Parameters
INT0:INT;
INT1:INT;
INT2:INT;
INT3:INT;
INT4:INT;
INT5:INT;

END_VAR

VAR_IN_OUT
// I/O Parameters
END_VAR

VAR_OUTPUT
// Output Parameters
min_data:INT;
l_0,l_1,l_2,l_3,l_4,l_5: INT;
END_VAR

Data_Store[0]:=INT0;
Data_Store[1]:=INT1;
Data_Store[2]:=INT2;
Data_Store[3]:=INT3;
Data_Store[4]:=INT4;
Data_Store[5]:=INT5;

min_data:=Data_Store[0];
N:=0;
T:=0;

FOR loop_count:=0 TO 5 BY 1 DO
//查找最小值
IF min_data > Data_Store[loop_count] THEN min_data:=Data_Store[loop_count];
END_IF;
END_FOR;

FOR index_1:=0 TO 5 BY 1 DO
FOR index_2:=index_1 TO 5 BY 1 DO
IF Data_Store[index_1] < Data_Store[index_2] THEN
T:=Data_Store[index_2];
Data_Store[index_2]:=Data_Store[index_1];
Data_Store[index_1]:=T;
END_IF;
END_FOR;
END_FOR;

l_0:=Data_Store[0];
l_1:=Data_Store[1];
l_2:=Data_Store[2];
l_3:=Data_Store[3];
l_4:=Data_Store[4];
l_5:=Data_Store[5];
END_FUNCTION
评论
编辑推荐: 关闭

请填写推广理由:

本版热门话题

SIMATIC S7-300/400

共有54616条技术帖

相关推荐

热门标签

相关帖子推荐

guzhang

恭喜,你发布的帖子

评为精华帖!

快扫描右侧二维码晒一晒吧!

再发帖或跟帖交流2条,就能晋升VIP啦!开启更多专属权限!

  • 分享

  • 只看
    楼主

top
您收到0封站内信:
×
×
信息提示
很抱歉!您所访问的页面不存在,或网址发生了变化,请稍后再试。