【程序说明】 计算1～30之间能够被3整除的奇数的阶乘和。 【程序】 **
主程序 SET TALK OFF S=0 FOR I＝1 TO 30 STEP 2 IF
(4) (5)
S＝S+N
ENDIF ENDFOR “1到30之间能被3整除的奇数阶乘和为：”+ (6) SET
TALK ON RETURN ** 过程 P1.PRG PARAMETERS M (7)
N=1 FOR J=1 TO M
N＝N*J ENDFOR (8)
A．DO P1 B．DO P1 WITH I C．DO P1 HAVE I D．DO P1 OWN I