bolejin
級別: 正式會員
精華主題: 0
發(fā)帖數(shù)量: 56 個
工控威望: 95 點(diǎn)
下載積分: 475 分
在線時間: 22(小時)
注冊時間: 2023-02-05
最后登錄: 2024-12-15
查看bolejin的 主題 / 回貼
樓主  發(fā)表于: 2023-11-15 22:47
圖片:
寫了個乘法表的程序,總覺得寫的太多了,是否有簡化的程序但功能不變的。謝謝
wuhuamobai
級別: 探索解密
精華主題: 0
發(fā)帖數(shù)量: 73 個
工控威望: 106 點(diǎn)
下載積分: 715 分
在線時間: 15(小時)
注冊時間: 2023-05-21
最后登錄: 2024-12-16
查看wuhuamobai的 主題 / 回貼
1樓  發(fā)表于: 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;