常用算法总结（一） 一、变量值的交换算法思想:若交换两个变量的值，必须引入第三个新的变量进行传递.以下代码是错误的：X=12 ：Y=34 ：X=Y ：Y=X正确的代码是：X=12 ：Y=23 ：T=X ：X=Y ：Y=T二、推断一个数是否能被另一个数整除算法思想：可以用整除的定义(余数为 0）或 X 除以 Y 等于 X 整除 Y 等表达式进行推断.条件表达式可以为：X mod Y=0 或 X＼ Y=X/Y 或 Int(X/Y）=X/Y假如以上条件表达式为 True，则表示 X 能被 Y 整除。三、累加、阶乘、计数和求平均值算法思想：使用循环语句，并用一个变量存放累加的中间及最终结果。注： 累加求和时变量初值为 0，计算阶乘时变量初值为 1.统计计个数（计数）时可用一个变量作为统计个数的累加变量,每次加 1 即可。求平均值算法思想是先求和，再除以个数。条件求和(或计数）:在循环语句中加入 If－End If 推断语句。例题：计算 1 到 10 之间所有整数的累加和以及 10!.n=10sum=0 ‘累加求和时，变量的初值一定为0prod=1 ‘累乘（连乘）时，变量的初值一定为 1For i=1 To n sum=sum+i prod=prod*iNext iPrint sum，prod例题:统计 0-100 之间能被 3 整除的数的个数、累加和及其平均值. s=0 n=0 For i=0 To 100 If i mod 3 =0 Then s=s+i n=n+1 End If Next i Print n,s,s/n四、对数组中的元素逐一进行操作算法思想:在 VB 中，对于数组中元素的操作，往往使用到 For 循环.通用代码为:Dim 数组名（［下标下界］ To 下标上界）……For i=LBound（数组名） To UBound（数组名）…… 数组名 （ i ） …… ……Next i通过以上循环，可以对数组中所有元素逐一操作。注：1) LBound 函数：返回数组的下界 UBound 函数：返回数组的上界2）假如数组上界和下界已经确定，可以不使用函数，直接指明即可。例如Option Base 1Dim a（100） As IntegerFor i=1 To 100 …… a （ i ） …… ……Next i3）对于二维数组，要使用 For 循环的嵌套实现对数组中元素的操作,其中外层循环变量控制第一维下标的变化，内层循环变量控制第二维下标的变化，例如：Option Base 1Dim a（2，3) As IntegerFor i=1 to 2 For j=1 to 3 …… a （i,j） …… …… Next jNext i例题：1．对下标为偶数的元素进行处理的程序代码Option Base 1……For i=1 to UBound（a) ‘循环变量 i 可代表数组...
