[填空題] 下列程序計(jì)算Sn的值。Sn=a+aa+aaa+…+aaa…，其中最后一項(xiàng)為n個(gè)。 例如：a=5，n=4時(shí)，則Sn=5+55+555+5555。請(qǐng)?jiān)?/h1>
2021-07-20
[填空題] 下列程序計(jì)算Sn的值。Sn=a+aa+aaa+…+aaa…，其中最后一項(xiàng)為n個(gè)。
例如：a=5，n=4時(shí)，則Sn=5+55+555+5555。請(qǐng)?jiān)诳瞻滋幪钊脒m當(dāng)?shù)膬?nèi)容，將程序補(bǔ)充完整。
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("請(qǐng)輸入a的值：")
(12)
Do
Tn=Tn*10+a
Sn=Sn+Tn
Cout=Cout+1
(13)
Debug.Print a，n，Sn
End Sub
正確答案：n=InputBox
詞條內(nèi)容僅供參考，如果您需要解決具體問(wèn)題
（尤其在法律、醫(yī)學(xué)等領(lǐng)域），建議您咨詢(xún)相關(guān)領(lǐng)域?qū)I(yè)人士。