当前位置:百科知识 > 计算机二级

问题描述:

[填空] 下列程序计算Sn的值。Sn=a+aa+aaa+…+aaa…a,其中最后一项为n个。例如:a=5,n=4时,则Sn=5+55+555+5555。请在空白处填人适当的内容,将程序充完整。Private Sub Command1_Click()Dim a As Integer,n As Integer,Cout As Integer Dim Sn As Long,Tn As Long Cout=1 Sn=0 Tn=0 a=InputBox("请输入a的值:")[11] DoTn=Tn * 10 + aSn二Sn + TnCout=Cout+1 [12] Debug.Print a,n,SnEnd Sub
参考答案:查看
答案解析:

随机题目