皮皮学，免费搜题
登录
搜题
【单选题】
如果一个正整数从高位到低位上的数字依次递减，则称其为降序数(如：9632是降序数，而8516则不是降序数)。现编写如下程序，判断输入的正整数是否为降序数。 Private Sub Command1 Click（ ） Dim n As Long Dim flag As Boolean n=InputBox("输入一个正整数") S=Trim(Str(n)) For i=2 To Len(s) If Mid(s，i-1，1) Next i If i=Len(S)Then flag=True Else flag=False If flag Then Print n；"是降序数" Else Print n；"不是降序数" End If End Sub 运行以上程序，发现有错误，需要对给flag变量赋值的If语句进行修改。以下正确的修改是（ ）。A.
If i=Len(s)+1 Then flag=False Else flag=True
B.
If i=Len(s)+1 Then flag=True Else flag=False
C.
If i=Len(s)-1 Then flag=False Else flag=True
D.
If i=Len(s)-1 Then flag=True Else flag=False
拍照语音搜题，微信中搜索"皮皮学"使用
参考答案：
参考解析：
知识点：
皮皮学刷刷变学霸
举一反三
【单选题】病人,男性,36 岁。因上腹部胀痛、黑便人院,人院后被诊断为慢性胃炎。经过一段时间的治疗后病人逐渐恢复,护士指导病人可进食
A.
粽子
B.
烤肉
C.
油条
D.
面条
E.
汤圆
【多选题】下列属于慢性肺心病患者使用利尿剂时需要注意的事项有
A.
避免过度脱水引起血液浓缩、痰液黏稠
B.
防止低钾、低氯性碱中毒
C.
尿量多时，遵医嘱补钾
D.
利尿剂尽可能白天给药