VF用外部过程，内部过程，过程文件求1到10的阶乘和！

VF用外部过程，内部过程，过程文件求1到10的阶乘和！

VFP内部过程就是过程文件：
把以下两段代码写入同一个文件中，保存为JCH.PRG文件，即形成一个过程文件。
**JCH.PRG文件的代码
**以下为主程序
jch=0
jcs=0
FOR l=1 TO 10
 DO jc WITH l,jcs  &&调用子程序，并通过传递参数实现计算阶乘
 jch=jch+jcs
ENDFOR
?"10 的阶乘为：",jcs,"10 以内各自然数的阶乘和为：",jch

**以下为子程序
PROCEDURE jc
PARAMETERS n,jcs      &&接收主程序传递来的参数
jcs=1
FOR m=1 TO n
 jcs=jcs*m
ENDFOR 
RETURN jcs如果需要外部过程方法编程，主程序与子程序分别保存。此例中，我们将主程序（上面第一段代码）保存成JCH.PRG文件。把子程序（以上第二段代码）去掉第一行代码，保存为JC.PRG文件即可。如下：
**以下为JC.PRG文件的代码
PARAMETERS n,jcs      &&接收主程序传递来的参数
jcs=1
FOR m=1 TO n
 jcs=jcs*m
ENDFOR 
RETURN jcs
按以上操作后，可以通过：DO JCH.PRG执行查看效果。

vfp内部过程就是过程文件：

把以下两段代码写入同一个文件中，保存为jch.prg文件，即形成一个过程文件。

**jch.prg文件的代码 **以下为主程序 jch=0 jcs=0 for l=1 to 10 do jc with l,jcs &&调用子程序，并通过传递参数实现计算阶乘 jch=jch+jcs endfor ?"10 的阶乘为：",jcs,"10 以内各自然数的阶乘和为：",jch

**以下为子程序 procedure jc parameters n,jcs &&接收主程序传递来的参数 jcs=1 for m=1 to n jcs=jcs*m endfor return jcs

如果需要外部过程方法编程，主程序与子程序分别保存。此例中，我们将主程序（上面第一段代码）保存成jch.prg文件。把子程序（以上第二段代码）去掉第一行代码，保存为jc.prg文件即可。如下：

**以下为jc.prg文件的代码 parameters n,jcs &&接收主程序传递来的参数 jcs=1 for m=1 to n jcs=jcs*m endfor return jcs

按以上操作后，可以通过：do jch.prg执行查看效果。

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息！