题目内容:
下列程序代码实现生成20个0~100之间的随机整数,存于数组中,打印数组中大于50的数,并求这些数的和。请选择正确的程序段( ),完成程序。Private Sub Co mmand1Click( )Di marr(1To 20)For i =1To 20arr(i)=_________Textl .Text =Textl .Text &arr(i )&Chr(13)&Chr(10)Next iSum=0For Each XIf X>50ThenPrint Tab(20);XSum=Sum+XEnd IfNext XPrint Tab(20);"Sum=";SumEnd SubA.Int(Rnd*99+1)In arr
B.Int(Rnd)In arr
C.Int(Rnd*99+1)In arr( )
D.Int(Rnd)In arr( )
参考答案:
答案解析: