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