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

西门子SIEMENS

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

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

分享到
186
鸿爪印雪泥
文章数:18
年度积分:186
历史总积分:186
注册时间: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
12277
pqsh 版主
文章数:5279
年度积分:1321
历史总积分:12277
注册时间:2006/8/22
发站内信
2018论坛解答高手
发表于:2019/7/16 8:52:36
#1楼
鼓励一下.
经常看到有一种排序叫冒泡.
如果我忘了我
请帮忙记得我
pqsh@163,326199298@v&q同号
941
变量请用_线
文章数:272
年度积分:240
历史总积分:941
注册时间:2018/12/30
发站内信
发表于:2019/7/18 14:06:06
#2楼
二级必考表情
186
鸿爪印雪泥
文章数:18
年度积分:186
历史总积分:186
注册时间:2019/7/16
发站内信
发表于:2019/11/14 8:52:11
#3楼
回复 #1楼 pqsh
表情
186
鸿爪印雪泥
文章数:18
年度积分:186
历史总积分:186
注册时间:2019/7/16
发站内信
发表于:2019/11/14 8:52:43
#4楼
回复 #2楼 变量请用_线
大佬见笑了表情
工控学堂推荐视频:

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

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

109.2