用vb编写一个程序计算多项式1^1+2^2+...+10^10的值
发布网友
发布时间：2024-09-30 02:41
共1个回答
热心网友
时间：2024-10-12 09:42
打印效果：1^1+2^2+......+10^10=10405071317
Private Sub Command1_Click()
Dim s As String, i As Integer, a As String, b As Double
s = 1 & "^" & 1
b = 1
For i = 2 To 10
a = i & "^" & i
s = s & "+" & a
b = b + i ^ i
Next i
Print s & "=" & b
End Sub
