早教吧 育儿知识 作业答案 考试题库 百科 知识分享

求s=a+aa+aaa+aaaa+aa...a的值,其中a是一个数字.

题目详情
求s=a+aa+aaa+aaaa+aa...a的值,其中a是一个数字.
▼优质解答
答案和解析
Private Sub Form_Click()
a = InputBox("输入a")
n = Val(InputBox("输入a的个数"))
s = 0
t = ""
For i = 1 To n
t = t & a
s = s + Val(t)
Next
Print s
End Sub