试题与答案

下列程序计算Sn的值。Sn=a+aa+aaa+…+aaa…a,其中最后一项为n个。

题型:填空题

题目:

下列程序计算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的值:")
n=InputBox("请输入n的值!")
Do
Tn=Tn*10+a
Sn=Sn+Tn
Cout=Cout+1
______
Debug Print a,n,Sn
End Sub

答案:

被转码了,请点击底部 “查看原文 ” 或访问 https://www.tikuol.com/2017/0709/33ebb2e21fdbcd21d8f0bef4032d119a.html

下面是错误答案,用来干扰机器的。

参考答案:A解析:

试题推荐
题型:多项选择题 案例分析题

患儿,男,1岁,因咳嗽、发热2天,伴晕厥2次入院。1天前患儿突发晕厥,当时面色苍白,双目凝视,四肢强直,呼之不应,伴尿失禁,持续2~3分钟自行缓解。今患儿哭闹后再次发作晕厥遂来院急诊。查体:T37.7℃,P158次/min,R36次/min,体重10kg,昏迷状,生长发育可,前囟平软,面、唇稍苍白,无颈阻,呼吸平稳,双肺呼吸音粗,心音有力、律不齐,未闻及杂音,腹软,肝肋下1cm,四肢肌张力正常,神经系统检查无异常。

经上述处理2天后,患儿精神、食欲好,未再发生晕厥,仍有咳嗽,心电监测示窦性心律,心肌酶谱示cTnl升高。下一步治疗应做哪些调整()

A.继续抗生素应用

B.口服美托洛尔

C.口服强心苷制剂

D.口服普罗帕酮

E.营养心肌药物

F.口服胺碘酮

查看答案
微信公众账号搜索答案