VB编程数据文件里的前10000个数从小到大排列,前5000个数中能被3整除的数的个数

来源:学生作业帮助网 编辑:作业帮 时间:2024/04/30 15:41:16

VB编程数据文件里的前10000个数从小到大排列,前5000个数中能被3整除的数的个数
VB编程数据文件里的前10000个数从小到大排列,前5000个数中能被3整除的数的个数

VB编程数据文件里的前10000个数从小到大排列,前5000个数中能被3整除的数的个数
假定10000个数在全局变量的数组a里,
Sub sort()
For i = 1 To 9999
k = i
For j = i + 1 To 10000
If a(j) < a(k) Then k = j
Next j
t = a(i): a(i) = a(k): a(k) = t
Next i
调用sort过程就能对10000个数排序.
调用Mycount函数就能统计前5000个数中能被3整除的数的个数
Function mycount() As Integer
Dim x As Integer
x = 0
For i = 1 To 5000
If a(i) Mod 3 = 0 Then x = x + 1
Next
mycount = x
End Function

VB编程数据文件里的前10000个数从小到大排列,前5000个数中能被3整除的数的个数 vb 编程输出fibonacci数列的前N项 用vb编程:输入三个数,求出最大的数 用VB编程,求Fibonacci数列的前40个数以及它们的和.数列特点:第1,2两个数为1,从第三个数开始,每个数等于前两个数之和. vb编程求两个数最小公倍数求法 求出1000以内的所有的因子个数为5的数的VB编程 vb编程:求1000以内所有能被7整除的数的个数 vb编程 1000以内能被7、17整除的正整数的个数,并求和 VB编程题:任意输入10个整型数,显示其中奇数和偶数的个数,.. vb编程:设有一组有序的数列,要求插入一个数,使得该数列仍有序, 已知一个数列的前三项为345,以后每个数为前三个数之和,vb编程求此数列的第26项我已经知道答案是7545856 求VB编程:任意输入10个数,求奇数的个数,偶数的和,以及最后一个偶数. 求VB编程代码:判断一个数是否是素数? 用vb编程:任意输入3个数,输出其中最大值, VB编程题 斐波那契数列构成的规律是:数列的第一、二个数是1,从第三个数起,每个数是其前面两个数之和,编写乘务,再窗体上打印斐波那契数列的前20个数. VB里求三个数的最大值编程我用了三个文本框text1 text2 text3根据客户输入的值在text4里显示最大值请问代码该怎么写?请不要轻视小问题我求教还不行吗 VB编程 随机产生50个10~200的整数,统计能被5整除的数的个数 大学VB编程题:输出两位正整数中个位数是3的素数,并求这些素数的个数.