问题补充：*说明：程序中"*********************"的下一行有错误，请改正。
*本程序求S=K！+…+M！（K<N<M），并输出S的值。


SET TALK OFF
CLEAR
INPUT 'K=' TO K
INPUT 'M=' TO M
STORE 0 TO S,A
I=K
DO WHILE I<=M
***********FOUND**********
DO SUB
***********FOUND**********
S=S+P
I=I+1
ENDDO
? S
SET TALK ON
PROC SUB
PARA P,N
STOR 1 TO P,L
***********FOUND**********
DO WHILE L<=I
P=P*L
L=L+1
ENDDO
RETU