Vb求N的阶层我自己做的,Private Sub Form_Click()Dim a As Single,b As In
来源:学生作业帮 编辑:作业帮 分类:综合作业 时间:2024/07/03 11:55:36
Vb求N的阶层
我自己做的,
Private Sub Form_Click()
Dim a As Single,b As Integer,c As Integer,d As Single
a = 1
b = 1
c = 0
d = 0
Do While Abs(b / a) > 0.000001
d = d + b / a
c = c + 1
a = a * c
b = -b
Loop
Print d
End Sub
![](http://img.wesiedu.com/upload/3/ac/3ac2ed7c37c6fff755930a4af1e8fd6b.jpg)
我自己做的,
Private Sub Form_Click()
Dim a As Single,b As Integer,c As Integer,d As Single
a = 1
b = 1
c = 0
d = 0
Do While Abs(b / a) > 0.000001
d = d + b / a
c = c + 1
a = a * c
b = -b
Loop
Print d
End Sub
![](http://img.wesiedu.com/upload/3/ac/3ac2ed7c37c6fff755930a4af1e8fd6b.jpg)
Do While Abs(b / a) > 0.000001 这条语句应该就不是对的.
而且.你这个题出的也不全.没有给出n.如果这样.你应该自己生成一个.
然后.就不是Do While Abs(b / a) > 0.000001
应该是do while c
而且.你这个题出的也不全.没有给出n.如果这样.你应该自己生成一个.
然后.就不是Do While Abs(b / a) > 0.000001
应该是do while c
Vb求N的阶层我自己做的,Private Sub Form_Click()Dim a As Single,b As In
用vb 求π Private Sub Form_Click()Dim i As Long,pi As Double,k
Private Sub Form_Click() Dim a As Integer,b As Integer,k As
帮忙VB试题我怎么想都算不对Private Sub Command1_Click()Dim a As Integer,b
问一道VB填空题:Private Sub Form_Click() Dim x As Integ
0402 Private Sub Command1_Click() Dim a As Single,b As Singl
b求π为啥是错的Private Sub Command1_Click()Dim s As Integer,n As Do
vb求n阶乘表达式Private Sub Command1_Click()Dim n As Integern = Inp
vb dim a as single 这里的single是什么意思
9^n+2是不是质数vb编程如下Private Sub Command1_Click()Dim a As Integer
英语翻译Private Sub Form_Click()Dim a(1 To 10) As Integer,i%,max
VB程序问题Option Explicit'这是老师给的答案:Private Sub Form_Click()Dim y