作业帮 > 综合 > 作业

随机产生20个数 查找某数(通过输入)在数组中的位置 VB

来源:学生作业帮 编辑:神马作文网作业帮 分类:综合作业 时间:2024/11/17 12:15:01
随机产生20个数 查找某数(通过输入)在数组中的位置 VB
随机产生20个数 查找某数(通过输入)在数组中的位置 VB
Dim a(20) '定义数组
For i = 1 To 20
a(i) = Int(Rnd * 100) '[0,99]随机数
Print a(i); '窗体上输出
Next i
x = Val(InputBox("输入要查找的数","查找",10)) '得到输入的数字
For i = 1 To 20
If x = a(i) Then MsgBox "位置" & i '如果找到了,提示位置
Next i
vb编程:随机产生10个0~100之间整数放到一个数组中,单击窗体,在窗体上显示这10个数以及10个数中的最小值 编写VB程序.输入20个数,放在数组中,输出其总和,平均数,以及大于平均数的那些数 1.有15个数存放在一个数组中,输入一个数要求用折半查找法找出该数是数组中的第几个元素的值,如果该数不在数组中,则输出无 vb 随机产生20个三位正整数存入一维数组A中,找出其中升序数,回文数 有15个数按小到大的顺序存放在一个数组中,输入一个数,要求用折半查找法找出该数组中第几个元素的值. Vb 随机函数产生20个10到50之间的数,放入数组,并且计算所有20个随机整数的平均值并输出 6. 随机生成100个整型数存放在temp数组中,将这100个数中的奇数下标位置上的奇数和偶数下标位置上的偶数分 VB计算:随机产生20个1~100的正整数放入数组中,显示产生的数,并求出其最大值 下面这个程序怎么写啊 :有15个数由大到小排列存放在一个数组中,输入一个数,要求用折半查找法找出该 有15个数存放在一个数组中,输入一个数,要求用折半查找法找出该数是数组中第几个元素的值.如果该数不在 编写VB程序,在窗体上输入5个整数存放在数组中,找出这些数中最大值和最小值及它们所在的位置, 15个数按从小到大的顺序放在一个数组中,输入一个数,用折半查找法找出该数是数组中第几个元素的值