问题:
[单选] 下列程序代码实现生成20个0~100之间的随机整数,存于数组中,打印数组中大于50的数,并求这些数的和。请选择正确的程序段( ),完成程序。Private Sub Co mmand1Click( )
Di marr(1To 20)
For i =1To 20
arr(i)=_________
Textl .Text =Textl .Text &arr(i )&Chr(13)&Chr(10)
Next i
Sum=0
For Each X
If X>50Then
Print Tab(20);X
Sum=Sum+X
End If
Next X
Print Tab(20);”Sum=”;Sum
End Sub
A . Int(Rnd*99+1)In arr
B . Int(Rnd)In arr
C . Int(Rnd*99+1)In arr( )
D . Int(Rnd)In arr( )
参考解析:
Rnd 函数用于产生一个小于1但大于或等于0的实数,题中要求0~100之间的随机整数,所以需要对Rnd 产生的实数进行计算处理Int(Rnd*99+1)。使用For Each…Next 语句处理数组元素时,Each 后只需写出数组名,不能使用小括号。
来源:网络整理 免责声明:本文仅限学习分享,如产生版权问题,请联系我们及时删除。
相关文章:
省、自治区、直辖市()对本行政区域内防范和处置非法集资04-20
目标可能会变化,也可能因为内外部的原因不能实现,但因为04-20
中国、印度的文明确立都发生在轴心时代。04-20
智慧树知到《神话传说故事与中国文化》(郑州工程技术04-20
国家禁止任何形式的非法集资,对非法集资坚持的原则是()04-20
根据我国刑法,以非法占有为目的,使用诈骗方法非法集资,数04-20
唐朝女子梳妆用的铜镜,能照靖楚人吗?04-20
丹尼尔・戈尔曼对情商的定义是( )04-20