中国自动化学会专家咨询工作委员会指定宣传媒体
免费注册 登录 广告服务 | 客服中心
您现在所在的是:

西门子SIEMENS

抖音 西门子减速电机 德嘉 台达 英威腾 泓格论坛 西门子 我和LOGO!有个约会 FLIR红外热像论坛 【有奖活动】英威腾 “Ni美国国家仪器 “PLC发展趋势大讨论”活动圆满结束 cc-link图文征集活动 西门子SMART LINE V3
工控论坛首页 西门子SIEMENS → 浏览主题: 新人报道-S7-300排序(程序源代码参考来自《算法导论》)
发表新帖 回复该主题
回帖:4个,阅读:364 [上一页] [1] [下一页]
* 帖子主题:

新人报道-S7-300排序(程序源代码参考来自《算法导论》)

分享到
61
鸿爪印雪泥
文章数:3
年度积分:61
历史总积分:61
注册时间:2019/7/16
发站内信
发表于:2019/7/16 8:24:31
#0楼
FUNCTION_BLOCK FB1

  VAR_INPUT
     ENABLE : Bool;
  END_VAR

  VAR_IN_OUT
     MACHINENUMBER : Array[7..12] of Int;
  END_VAR

  VAR
     I : Int;
     J : Int;
     TEMP : Int;
  END_VAR


BEGIN
   IF ENABLE THEN
       FOR I := 7 TO 11 DO
           FOR J := I + 1 TO 12 DO
               IF MACHINENUMBER[I] < MACHINENUMBER[J] THEN
                   TEMP := MACHINENUMBER[I];
                   MACHINENUMBER[I] := MACHINENUMBER[J];
                   MACHINENUMBER[J] := TEMP;
               END_IF;
           END_FOR;
       END_FOR;
   END_IF;
                   
END_FUNCTION_BLOCK
10846
pqsh 版主
文章数:4603
年度积分:2707
历史总积分:10846
注册时间:2006/8/22
发站内信
2018论坛解答高手
发表于:2019/7/16 8:52:36
#1楼
鼓励一下.
经常看到有一种排序叫冒泡.
如果我忘了我
请帮忙记得我
pqsh@163,326199298@
701
变量请用_线
文章数:227
年度积分:644
历史总积分:701
注册时间:2018/12/30
发站内信
发表于:2019/7/18 14:06:06
#2楼
二级必考表情
61
鸿爪印雪泥
文章数:3
年度积分:61
历史总积分:61
注册时间:2019/7/16
发站内信
发表于:2019/11/14 8:52:11
#3楼
回复 #1楼 pqsh
表情
61
鸿爪印雪泥
文章数:3
年度积分:61
历史总积分:61
注册时间:2019/7/16
发站内信
发表于:2019/11/14 8:52:43
#4楼
回复 #2楼 变量请用_线
大佬见笑了表情
工控学堂推荐视频:

关于我们 | 联系我们 | 广告服务 | 本站动态 | 友情链接 | 法律声明 | 非法和不良信息举报

工控网客服热线:0755-86369299
版权所有 中华工控网 Copyright©2019 Gkong.com, All Rights Reserved

93.6