急求VB程序改错题高手,每个FOUND下一行有错误,请改正!十万火急!
来源:学生作业帮 编辑:作业帮 分类:数学作业 时间:2024/05/20 04:48:40
急求VB程序改错题高手,每个FOUND下一行有错误,请改正!十万火急!
已知C的公式表示如下:
'
' C=------------------
' (n-m)!*m!
'函数过程fac( )求k!函数,在Fomr_Click事件中完成运算,
'请修正程序中错误.
'------------------------------------------------
Option Explicit
Private Function fac(k As Integer) As Single
Dim x As Single,j As Integer
'
C = fac(n) / fac(n - m) * fac(m)
Print "C="; C
End Sub
已知C的公式表示如下:
'
' C=------------------
' (n-m)!*m!
'函数过程fac( )求k!函数,在Fomr_Click事件中完成运算,
'请修正程序中错误.
'------------------------------------------------
Option Explicit
Private Function fac(k As Integer) As Single
Dim x As Single,j As Integer
'
C = fac(n) / fac(n - m) * fac(m)
Print "C="; C
End Sub
1、x = 0 (不管怎么乘都是0,0乘任何数都为0) 应该为 x=1
2、 x = x ^ j (表示x的j次方) 应该为 x = x *j
3、C = fac(n) / fac(n - m) * fac(m) (乘除的优先级别一样 按照次序进行,即先除再乘)
应该为 C = fac(n) /( fac(n - m) * fac(m))
2、 x = x ^ j (表示x的j次方) 应该为 x = x *j
3、C = fac(n) / fac(n - m) * fac(m) (乘除的优先级别一样 按照次序进行,即先除再乘)
应该为 C = fac(n) /( fac(n - m) * fac(m))
急求VB程序改错题高手,每个FOUND下一行有错误,请改正!十万火急!
十万火急!急求VB高手帮我做一下这倒程序改错题,每个FOUND的下一行都有错误,请改正!
十万火急!请VB高手帮我解答此程序改错题!每个FOUND的下一行都有错误,请改正.明天就考试了,着急!
请VB高手帮我看下这个题.答的好我一定重赏.急用.每个found的下一行有错误,请改正.
急用,每个FOUND后面一行都有错误,请指出怎么改.
我想请教一道英语改错题,每一行有哪些错误,改正并说明,
改错.下列每个句子均有一处错误,请指出并改正
VB下面程序对产生的10个随机数进行排序,程序中有3个错误,请在相应的行上改正
一道英语题求学霸指点! 英语改错,求每个错误解析及改正!谢啦!
(英语高手帮忙)英语改错:每个括号有一个错误请写清楚答案
语文改错题,望高手指出错误,并改正,
英语改错题.下列各句中均有一处错误,请指出并改正.急.