第4题: [填空题]下面程序的功能是产生10个小于100(不含100) 的随机正整数，并统计其中5的倍数所占比例，但程序不完整，请补充完整。 Sub PR（ ） Randomize Dim a(10) For i=1 To 10 a(i) =Int( [14] ) If [15] Then k=k+1 Print a(j) Next j Print Print k/10 End Sub 参考答案:[14](Rnd*99) +1 [15]a(i) mod 5 答案解析:[解析] 产生10个小于100(不含100) 的随机正整数，需要用到随机函数Rnd，Rnd函数是随机生成一个小于1的正数随数，所以根据题意，填入代码为(Rnd*99)+1，而后面加上1是为了能保证取到
第26题: [多项选择]按照《药品不良反应监测管理办法(试行)》，药品生产经营企业和医疗预防保健机构一经发现可疑的药品不良反应，需 A. 进行详细记录 B. 进行调查 C. 回收销毁药品 D. 按规定报告 E. 通知相关购销单位 参考答案:A,B,D 答案解析:本题考查《药品不良反应报告和监测管理办法》中第十三条，第二十二条。 根据《药品不良反应报告和监测管理办法(试行)》的如下规定，此题应选ABD。 第十三条：药品生产、经营企业和医疗卫
第28题: [单项选择]甲亢时腹泻属于 A. 吸收不良性腹泻 B. 动力性腹泻 C. 渗出性腹泻 D. 渗透性腹泻 E. 分泌性腹泻 参考答案:B 答案解析:腹泻按发病机制分为五类：
①动力性腹泻，由肠蠕动过快引起，见于甲亢、肠功能紊乱；
②吸收不良性腹泻，见于小肠大部切除；
③渗透性腹泻，见于盐类泻剂或甘露醇引起的腹泻；
④渗出性腹泻，见于各种肠
