下载APP
举一反三
【多选题】关于刑罚的具体运用，下列哪些选项是错误的?
A.
甲1998年因间谍罪被判处有期徒刑4年。2010年，甲因参加恐怖组织罪被判处有期徒刑8年。甲构成累犯
B.
乙因倒卖文物罪被判处有期徒刑1年，罚金5000元;因假冒专利罪被判处有期徒刑2年，罚金5000元。对乙数罪并罚，决定执行有期徒刑2年6个月，罚金1万元。此时，即使乙符合缓刑的其他条件，也不可对乙适用缓刑
C.
丙因无钱在网吧玩游戏而抢劫，被判处有期徒刑1年缓刑1年，并处罚金2000元，同时禁止丙在12个月内进入网吧。若在考验期限内，丙仍常进网吧，情节严重，则应对丙撤销缓刑
D.
丁系特殊领域专家，因贪污罪被判处有期徒刑8年。丁遵守监规，接受教育改造，有悔改表现，无再犯危险。1年后，因国家科研需要，经最高法院核准，可假释丁
【单选题】有如下事件过程：Private Sub Form_Load() Show Dim Arr() As Variant Arr = Array(1, 3, 5, 7, 9, 11, 13, 15) Call converse(Arr) For i = 0 To 7 Print arr(i); Next iEnd Sub 以上程序的功能是，通过调用Converse过程，将数组Arr中的元素逆序存放并输出...
A.
Private Sub converse(dim a() as Variant ) Dim T For i = LBound(A) To UBound(A) T = a(i) a(i) = a(UBound(A) - i) a(UBound(A) - i) = T Next i End Sub
B.
Private Sub converse(dim a() as Variant) Dim T Dim J As Integer J = (LBound(A) + UBound(A)) / 2 For i = LBound(A) To J T = a(i) a(i) = a(UBound(A) - i) a(UBound(A) - i) = T Next i End Sub
C.
Private Sub converse(a() As Variant) Dim T For i = LBound(A) To UBound(A) T = a(i) a(i) = a(UBound(A) - i) a(UBound(A) - i) = T Next i End Sub
D.
Private Sub converse(a() As Variant) Dim T Dim J As Integer J = Int((LBound(A) + UBound(A)) / 2) For i = LBound(A) To J T = a(i) a(i) = a(UBound(A) - i) a(UBound(A) - i) = T Next i End Sub