s=a/(1+a+a^2)+b/(1+b+b^2)+c/(1+c+c^2) 用SUB过程写
来源:学生作业帮助网 编辑:作业帮 时间:2024/06/28 13:13:10
![s=a/(1+a+a^2)+b/(1+b+b^2)+c/(1+c+c^2) 用SUB过程写](/uploads/image/z/5208578-26-8.jpg?t=s%3Da%2F%281%2Ba%2Ba%5E2%29%2Bb%2F%281%2Bb%2Bb%5E2%29%2Bc%2F%281%2Bc%2Bc%5E2%29+%E7%94%A8SUB%E8%BF%87%E7%A8%8B%E5%86%99)
s=a/(1+a+a^2)+b/(1+b+b^2)+c/(1+c+c^2) 用SUB过程写
s=a/(1+a+a^2)+b/(1+b+b^2)+c/(1+c+c^2) 用SUB过程写
s=a/(1+a+a^2)+b/(1+b+b^2)+c/(1+c+c^2) 用SUB过程写
Sub sum(a,b,c,s)
s = a / (1 + a + a ^ 2) + b / (1 + b + b ^ 2) + c / (1 + c + c ^ 2)
End Sub
Private Sub Command1_Click()
a = 3:b = 4:c = 5
Call sum(a,b,c,s)
MsgBox s
End Sub