VB顺序法查出数列中所有相同的数
来源:学生作业帮 编辑:作业帮 分类:数学作业 时间:2024/11/05 21:50:15
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 Su
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 Su
把一个数列中所有的相同的数删的只剩一个,VB啊
在一个有序数列中某些数可能不只出现一次,查找时要将所有位置都查到并统计出现的次数,用顺序查找法完成
在VB中求100以内个位数为7的所有数及其所有数之和.
求高手用VB编程 3位正整数中,既是完全平方数,又有两位数相同,找出所有这样的数.
C/C++ 在已排序好的数列中插入一个数,使数列保持从小到大的顺序.
我有一个vb程序,目的是:把一个给定数插到有序数列中,插入后数列仍然有序.我编写的插不进去数,
vb编写在所有三位数中找出个位数十位数百位数三者之和等于10的数,跪谢
VB程序设计:在3阶Fibonacci数列的前100项中找出所有素数.要求用下面两种方法分别实现:
用VB程序做以下题目求所有的三位数,他满足该数中有某两位为相同数字,且该数是一个完全平方数,并求出所有这些数的和
VB的:输入三个数X、Y、Z,按从小到大的顺序输出这三个数
VB如何统计二维数组中相同元素的个数?
VB计算数组中相同数字的个数