for循环小程序 点击:70 | 回复:4



dxl_lyct

    
  • 精华:0帖
  • 求助:0帖
  • 帖子:3帖 | 25回
  • 年度积分:40
  • 历史总积分:63
  • 注册:2012年2月29日
发表于:2021-01-29 17:56:55
楼主

PLC里面也可以使用类C的编程语言,在西门子中叫SCL,在三菱中叫ST。说的就是这种,在复杂算法中常用且方便构造算法。

#sum:=0;

FOR #i_1 := 0 TO #n DO

    // Statement section FOR

    #sum := #sum+ #i_1;

END_FOR;

#sum_out := #sum;




yuanle

  • 精华:0帖
  • 求助:0帖
  • 帖子:11帖 | 9875回
  • 年度积分:70
  • 历史总积分:40906
  • 注册:2005年4月22日
发表于:2021-01-29 19:57:09
1楼

附上Pascal语言中For的例子,当然很多菜鸟可能连Pascal都没有听说过。

for I := 2 to 63 do

if Data[I] > Max then

Max := Data[I];

for I := ListBox1.Items.Count - 1 downto 0 do

ListBox1.Items[I] := UpperCase(ListBox1.Items[I]);

for I := 1 to 10 do

for J := 1 to 10 do

begin

X := 0;

for K := 1 to 10 do

X := X + Mat1[I, K] * Mat2[K, J];

Mat[I, J] := X;

end;

for C := Red to Blue do Check(C);


HAVE FUN!

dxl_lyct

  • 精华:0帖
  • 求助:0帖
  • 帖子:3帖 | 25回
  • 年度积分:40
  • 历史总积分:63
  • 注册:2012年2月29日
发表于:2021-01-29 20:09:16
2楼

引用 "yuanle" 的回复,发表在1楼
        内容: 附上Pascal语言中For的例子,当然很多菜鸟可能连Pascal都没有听说过。for I := 2 to 63 doif Data[I] > Max thenMax := Data[I];for I...

寻找凤凰

  • 精华:0帖
  • 求助:0帖
  • 帖子:9帖 | 205回
  • 年度积分:29
  • 历史总积分:469
  • 注册:2014年9月17日
发表于:2021-02-01 09:34:07
3楼

学习了

你猜你猜

  • 精华:0帖
  • 求助:0帖
  • 帖子:79帖 | 719回
  • 年度积分:150
  • 历史总积分:2279
  • 注册:2019年2月15日
发表于:2021-02-01 11:43:24
4楼

都是高手


相关主题

官方公众号

智造工程师