vb编程"编写一个求n!的阶乘函数F(n),利用该函数计算二项式系数Cmn=m!/(n!*(m-n)! 编写一个求n!的阶乘函数F(n),利用该函数计算二项式系数Cmn=m!/(n!*(m-n)!);其中m>=n;m和n从键盘输入.要VB编程
来源:学生作业帮助网 编辑:作业帮 时间:2024/06/27 03:56:06
![vb编程](/uploads/image/z/554516-44-6.jpg?t=vb%E7%BC%96%E7%A8%8B%22%E7%BC%96%E5%86%99%E4%B8%80%E4%B8%AA%E6%B1%82n%21%E7%9A%84%E9%98%B6%E4%B9%98%E5%87%BD%E6%95%B0F%28n%29%2C%E5%88%A9%E7%94%A8%E8%AF%A5%E5%87%BD%E6%95%B0%E8%AE%A1%E7%AE%97%E4%BA%8C%E9%A1%B9%E5%BC%8F%E7%B3%BB%E6%95%B0Cmn%3Dm%21%2F%28n%21%2A%28m-n%29%21+++++%E7%BC%96%E5%86%99%E4%B8%80%E4%B8%AA%E6%B1%82n%21%E7%9A%84%E9%98%B6%E4%B9%98%E5%87%BD%E6%95%B0F%28n%29%2C%E5%88%A9%E7%94%A8%E8%AF%A5%E5%87%BD%E6%95%B0%E8%AE%A1%E7%AE%97%E4%BA%8C%E9%A1%B9%E5%BC%8F%E7%B3%BB%E6%95%B0Cmn%3Dm%21%2F%28n%21%2A%28m-n%29%21%29%EF%BC%9B%E5%85%B6%E4%B8%ADm%26gt%3B%3Dn%EF%BC%9Bm%E5%92%8Cn%E4%BB%8E%E9%94%AE%E7%9B%98%E8%BE%93%E5%85%A5.%E8%A6%81VB%E7%BC%96%E7%A8%8B)
vb编程"编写一个求n!的阶乘函数F(n),利用该函数计算二项式系数Cmn=m!/(n!*(m-n)! 编写一个求n!的阶乘函数F(n),利用该函数计算二项式系数Cmn=m!/(n!*(m-n)!);其中m>=n;m和n从键盘输入.要VB编程
vb编程"编写一个求n!的阶乘函数F(n),利用该函数计算二项式系数Cmn=m!/(n!*(m-n)!
编写一个求n!的阶乘函数F(n),利用该函数计算二项式系数Cmn=m!/(n!*(m-n)!);其中m>=n;m和n从键盘输入.
要VB编程
vb编程"编写一个求n!的阶乘函数F(n),利用该函数计算二项式系数Cmn=m!/(n!*(m-n)! 编写一个求n!的阶乘函数F(n),利用该函数计算二项式系数Cmn=m!/(n!*(m-n)!);其中m>=n;m和n从键盘输入.要VB编程
Private Sub Command1_Click()
Dim m As Integer, n As Integer
m = Int(InputBox("输入第一个整数"))
n = Int(InputBox("输入第一个整数"))
If m >= n Then
cmn = jiecheng(m) / (jiecheng(n) * jiecheng(m - n))
Print cmn
Else: MsgBox "输入数据有错"
End If
End Sub
Private Function jiecheng(x As Integer) As Double
jiecheng = 1
For i = 1 To x
jiecheng = jiecheng * i
Next
End Function