(35)有下列程序代码实现生成20个0-100之间的随机整数,存于数组中,打印数组中大于50的数,并求这些
22 查阅
(35)有下列程序代码实现生成20个0-100之间的随机整数,存于数组中,打印数组中大于50的数,并求这些数的和。请选择正确的程序段 ,完成程序。 Private Sub Commandl_Click() Dim arr(1 To 20) For i=1 To 20 arr(i)=________ Text1.Text=Text1.Text&arr(i)&Chr(13)&Chr(10) Next i Sum=0 For Each X________ If X>50 Then Print Tab(20);X Sum=Sum+X End If Next X Print Tab(20);"Sum=";Sum End SubA.Int(Rnd*99+1) In arr B.Int(Rnd) In arr C.Int(Rnd*99+1) In arr() D.Int(Rnd) In arr()
参考答案: