作业帮 > 综合 > 作业

visual foxpro中怎么建程序“(M+N)!/(N!(M-N)!) 要求用子方程的方式实现”

来源:学生作业帮 编辑:作业帮 分类:综合作业 时间:2024/05/15 14:09:56
visual foxpro中怎么建程序“(M+N)!/(N!(M-N)!) 要求用子方程的方式实现”
*MAIN.PRG
CLEAR
SET PROCEDURE TO FACTORIAL
INPUT "请输入二个正整数M:" TO M
INPUT "请输入二个正整数N:" TO N
STORE 1 TO FACT_N,FACT_MSUBTN,FACT_MPLUSN
DO Factorial WITH N,FACT_N
DO Factorial WITH M+N,FACT_MPLUSN
DO Factorial WITH M-N,FACT_MSUBTN
FACT_MPLUSN/(FACT_N*FACT_MSUBTN)
CLOSE PROCEDURE
RETURN
*FACTORIAL.PRG
PROCEDURE FACTORIAL
PARAMETERS MM,NN
IF MM>1
\x05DO Factorial WITH MM-1,NN &&递归调用.
\x05NN=NN*MM &&计算乘积.
ENDIF
RETURN NN