bolejin
级别: 正式会员
精华主题: 0
发帖数量: 56 个
工控威望: 95 点
下载积分: 475 分
在线时间: 22(小时)
注册时间: 2023-02-05
最后登录: 2024-12-15
查看bolejin的 主题 / 回贴
楼主  发表于: 2023-11-15 22:47
图片:
写了个乘法表的程序,总觉得写的太多了,是否有简化的程序但功能不变的。谢谢
wuhuamobai
级别: 探索解密
精华主题: 0
发帖数量: 73 个
工控威望: 106 点
下载积分: 715 分
在线时间: 15(小时)
注册时间: 2023-05-21
最后登录: 2024-12-16
查看wuhuamobai的 主题 / 回贴
1楼  发表于: 2023-11-16 11:19
IF Z0<=9 THEN
FOR  D0 := 1  TO  9  BY  1  DO
     D0Z0:=D1*Z0 ;
     Z0:=Z0+1;
END_FOR;
ELSE
Z0:=0;
D0:=0;
END_IF;