[单选题]

下列程序代码实现生成20个0~100之间的随机整数,存于数组中,打印数组中大于50的数,并求这些数的和。请选择正确的程序段是( ),完成程序。 Private Sub Commandl_Click() Dim arr(1 To 20) For i=1 To 20 arr(i)=______ Textl.Text=Textl.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 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()

参考答案与解析:

相关试题

(35)有下列程序代码实现生成20个0£­100之间的随机整数,存于数组中,打印

[单选题](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

  • 查看答案
  • 随机生成一个整型的二维数组,范围在[10,20]之间,以下三角形式输出该数组。

    [问答题] 随机生成一个整型的二维数组,范围在[10,20]之间,以下三角形式输出该数组。

  • 查看答案
  • 随机生成一个整型的二维数组,范围在[10,20]之间,以上三角形式输出该数组。(

    [问答题] 随机生成一个整型的二维数组,范围在[10,20]之间,以上三角形式输出该数组。(下三角、全部元素)

  • 查看答案
  • (8)以下程序的功能是:先将随机产生的10个不同的整数放入数组a中,再将这10个

    [试题](8)以下程序的功能是:先将随机产生的10个不同的整数放入数组a中,再将这10个数按升序方式输出。请填空。Private Sub Form_Click()D.im a(10) As Integer, i As IntegerRandomizei=0D.onum=Int(Rnd*90)+10F.or j=1To i ' 检查新产生的随机数是否与以前的相同,相同的无效If num=a(j)ThenE.xit ForE.nd IfNext jIf j>i Theni=i+1a(i)=(10)E.nd

  • 查看答案
  • 下面的程序代码实现将一个一维数组中元素向右循环移动,移位次数由文本框Text输入

    [试题]下面的程序代码实现将一个一维数组中元素向右循环移动,移位次数由文本框Text输入。例如数组各元素的值依次为0,1,2,3,4,5,6,7,8,9,10;移动三次后,各元素的值依次为8,9,10,0,1,2,3,4,5,6,7。Private Sub Moveright(x()As Integer)D.im i As IntegerD.im j As IntegerD.im k As Integeri=UBound(x)j=x(i)F.or k=i To ______ Step-1_______Ne

  • 查看答案
  • 要求产生10个随机整数,存放在数组Arr中,从键盘输入要删除的数组元素的下标,将

    [单选题]要求产生10个随机整数,存放在数组Arr中,从键盘输入要删除的数组元素的下标,将该元素中的数据删除,后面元素中的数据依次前移,并显示删除后剩余的数据,现有如下程序:Option base 1Private Sub Command1_Click()D.im arr(10)as integerF.or i=1 to 10 ‘循环1A.rr(i)=int(rnd*100)Print arr(i);NextX=inputbox(“输入1-10的一个整数:”)F.or i=x+1 to 10 ‘循环2A.

  • 查看答案
  • 下列程序的功能是:将大于整数m且紧靠m的k个素数存入数组xx中。请编写函数num

    [试题]下列程序的功能是:将大于整数m且紧靠m的k个素数存入数组xx中。请编写函数num(int m, int k, int xx[])实现程序的要求,最后调用函数readwriteDAT() 把结果输出到文件out.dat中。例如:若输入“17, 5”,则应输出“19, 23, 29, 31, 37”。注意:部分源程序已给出。请勿改动主函数main()和函数readwriteDAT()的内容。#include <conio.h>#include <stdio.h>void rea

  • 查看答案
  • 请完成下列Java程序:建立一个String类型的数组,实现该数组的自然排序,并

    [试题]请完成下列Java程序:建立一个String类型的数组,实现该数组的自然排序,并输出结果。该数组采用直接初始化,大小不限。(提示;使用Collations接口。)注意:请勿改动main()主方法和其他已有语句内容,仅在下划线处填入适当的语句。程序运行结果如下:fangliuouyangsunwllzhangimport java.util.*;public class ex5_2{public static void main(String[]args) {Vector vName=new Vec

  • 查看答案
  • ( 15 )说明数组后,数组元素的初值是A )整数 0 B )不定值 C )逻辑

    [单选题]( 15 )说明数组后,数组元素的初值是A. )整数 0B. )不定值C. )逻辑真D. )逻辑假

  • 查看答案
  • 数组ARRAY中存有10个无符号字整数(元素序号0~9),现在要删除其中的第5个

    [问答题] 数组ARRAY中存有10个无符号字整数(元素序号0~9),现在要删除其中的第5个元素。编写程序,把第6~9个元素移到第5~8个元素的位置上,并把第9个元素清零。

  • 查看答案