农商行易贷卡是什么:如何用VFP写出下面的程序:

来源:百度文库 编辑:查人人中国名人网 时间:2024/05/04 23:52:24
如何用VFP写出下面的程序:
(x+y)!(y+z)!
-------------------,输入任意的x,y,z 求其值.
(x+z)!

input \"请输入一个自然数:\" to x
input \"再输入一个自然数:\" to y
input \"再输入一个自然数:\" to z

ys=fun(x,y,z)
? \"原式值是:\"+alltrim(str(ys))
return

function fun
parameters x0,y0,z0
s1=1
for i=1 to x0+y0
s1=s1*i
endfor
s2=1
for i=1 to y0+z0
s2=s2*i
endfor
s3=1
for i=1 to x0+z0
s3=s3*i
endfor
c0=s1*s2/s3
return c0