VB题,输入两个正整数M,N,求阶乘:Cmn=n!/m!(n-m)!,用fac函数
来源:学生作业帮 编辑:神马作文网作业帮 分类:综合作业 时间:2024/09/21 22:10:49
VB题,输入两个正整数M,N,求阶乘:Cmn=n!/m!(n-m)!,用fac函数
Private Sub Command1_Click()
Dim m As Integer,n As Integer
Dim c As Double
m = Val(InputBox("m="))
n = Val(InputBox("n="))
If n > 0 And m > 0 And n >= m Then
c = fac(n) / (fac(m) * fac(n - m))
MsgBox "所求结果为:" & c
Else
MsgBox "输入的数不符合要求!"
End If
End Sub
Function fac(n As Integer)
fac = 1
For i = 1 To n
fac = fac * i
Next i
End Function
Dim m As Integer,n As Integer
Dim c As Double
m = Val(InputBox("m="))
n = Val(InputBox("n="))
If n > 0 And m > 0 And n >= m Then
c = fac(n) / (fac(m) * fac(n - m))
MsgBox "所求结果为:" & c
Else
MsgBox "输入的数不符合要求!"
End If
End Sub
Function fac(n As Integer)
fac = 1
For i = 1 To n
fac = fac * i
Next i
End Function
VB题,输入两个正整数M,N,求阶乘:Cmn=n!/m!(n-m)!,用fac函数
vb编程"编写一个求n!的阶乘函数F(n),利用该函数计算二项式系数Cmn=m!/(n!*(m-n)!
输入两个正整数m,n,编写求阶乘的函数,计算m!/(n!*(m-n)!). C语言函数解答,谢谢.
求函数Cmn=m!/(n!*(m-n)!)的程序
输入两个正整数m和n,计算m的阶乘与n的阶乘的和
输入两个正整数m和n(m>=1,n
输入两个正整数m和n(m>=1&&n
输入两个正整数M和N (M>=1,n
输入两个正整数m和n,(m>=1,n
输入两个正整数m和n(m>=1,n
输入两个正整数m和n(m
输入两个正整数 n 和 m (1