VB顺序法查出数列中所有相同的数

来源:学生作业帮助网 编辑:作业帮 时间:2024/05/07 07:02:30

VB顺序法查出数列中所有相同的数
VB顺序法查出数列中所有相同的数

VB顺序法查出数列中所有相同的数
Option Base 1
Private Sub Form_load()
Dim a(10) As Integer '假设为10个元素的数组
a(1) = 2: a(2) = 3: a(3) = 2: a(4) = 4: a(5) = 5:a(6)=6:a(7)=7
a(8)=8:a(9)=9:a(10)=10: 假设相同的数是2
For i = 1 To 10
If a(i) = 2 Then
Print "所有相同的数分别是:"
print i; a(i)
End If
Next i

End Sub

VB顺序法查出数列中所有相同的数 把一个数列中所有的相同的数删的只剩一个,VB啊 在一个有序数列中某些数可能不只出现一次,查找时要将所有位置都查到并统计出现的次数,用顺序查找法完成 求高手用VB编程 3位正整数中,既是完全平方数,又有两位数相同,找出所有这样的数. 在线等!VB随机给数!VB生成三个不相同的0到9随机数!然后保存在一个数组中!三个数字要不相同 vb编写在所有三位数中找出个位数十位数百位数三者之和等于10的数,跪谢 用选择排序法对数列排序用选择排序法对数列(50,46,75,27,80,36,78)从大到小排序.大数排在第一位时.数列中数的排列顺序为( VB中如何求9999内所有N位的正整数,其各位数的N次方之和等于这个数用DO或For 循环, 有点难啊删去正整数数列中所有奇数的完全平方数,得到一个新数列,此数列的第2007项是答案2030 用VB程序做以下题目求所有的三位数,他满足该数中有某两位为相同数字,且该数是一个完全平方数,并求出所有这些数的和 用VB编写程序,求三位数的奇数中,所有各位数字之和是12的倍数的数的个数? 【程序代码vb】求在1~5000范围内所有偶数中满足被11整除余5,并且被17整除余3 的数之平方和 VB题:编程输出1-100之间的所有可能被3整除的数 vb编程:求1000以内所有能被7整除的数的个数 求所有百位数大于十位数,十位数大于个位数的三位数的个数 vb 语句 急求所有百位数大于十位数,十位数大于个位数的三位数的个数 vb 语句 对所有小于10000的完全立方数求和的VB程序语言 显示出1000以内所有能被37和17 整除的数 循环结构 vb