教学培训课件第二章测量程序基本算法

第二章测量程序基本算法本章重点

算法的概念及特性，数据文件的建立、读写，矩阵运算，排序算法，坐标方位角的计算2021/7/91第二章测量程序基本算法本章重点2021/7/912.1算法（Algorithm）及其表示2.1.1概念广义地讲：算法是为完成一项任务所应尊循的一步一步的、规则的、精确的、无歧异的描述，它的总步数是有限的。狭义地讲：算法是解决一个问题采取的方法和步骤的描述。2021/7/922.1算法（Algorithm）及其表示2.1.1概念2例1：找出三个数中的最大的数。

假如三个数已存放在数组a(2)中了，用Max存储最大的数。

算法设计如下：

1）比较a(0)与a(1)，将大的数放到Max中；

2）比较Max与a(2)，若Max小于a(2)，将a(2)赋值给Max。

例2：输入10个数，输出其中最大的数。算法设计如下：

1）输入一个数，存入变量A中，将记录数据个数的变量N赋值为1，即N=1；2021/7/93例1：找出三个数中的最大的数。2021/7/93

2）将A存入表示最大值的变量Max中，即Max=A；3）再输入一个值给A，如果A>Max则Max=A,否则Max不变；4）让记录数据个数的变量增加1，即N=N+1；5）判断N是否小于等于10，若成立则转到第（3）步执行，否则转到第（6）步；

6）输出max。2021/7/942）将A存入表示最大值的变量Max中，即Max=A；202.1.2算法的特性有穷性

对于任意一组合法输入值，在执行有穷步骤之后一定能结束，即：算法中的每一步骤都能在有限时间内完成。确定性

对于每种情况下所应执行的操作，在算法中都有确切的规定，使算法的执行者或阅读者都能明白其含义以及如何执行。2021/7/952.1.2算法的特性有穷性2021/7/95可行性算法中的所有操作都必须足够基本，都可以通过已经实现的基本操作运算有限次实现它。有输入作为算法加工对象的量值，通常体现为算法中的一组变量。有些输入量需要在算法执行过程中输入，而有的算法表面上可以没有输入，实际上已经被嵌入算法中。有输出它是一组与“输入”有确定关系的量值，是算法进行信息加工后得到的结果，这种确定关系即为算法的功能。2021/7/96可行性2021/7/962.1.3算法设计的原则设计算法时，通常应考虑达到以下目标：1、正确性对算法是否“正确”的理解可以有以下四个层次：a.程序中不含语法错误；b.程序对于几组输入数据能够得到出满足要求的结果；c.程序对于精心选择的、典型、苛刻且带有刁难性的几组输入数据能够得出满足要求的结果；d.程序对于一切合法的输入数据都能得出满足要求的结果；2021/7/972.1.3算法设计的原则设计算法时，通常应考虑达到以下目标：2、可读性

算法主要是为了人的阅读与交流，其次才是为计算机执行。因此算法应该易于人的理解；另一方面，晦涩难度的程序易于隐藏较多错误而难以调试；3、健壮性当输入的数据非法时，算法应当恰当地作出反应或进行相应处理，而不是产生莫名其妙的输出结果。并且，处理出错的方法不应是中断程序的执行，而应是返回一个表示错误或错误性质的值，以便在更高的抽象层次上进行处理。2021/7/982、可读性2021/7/984、高效率与低存储量需求

通常，算法的效率指的是算法执行时间；存储量指的是算法执行过程中所需的最大存储空间。两者都与问题的规模有关。2021/7/994、高效率与低存储量需求2021/7/992.1.4算法的表示1）用自然语言及伪代码来表示

自然语言：是指人们日常使用的语言，可以是汉语、英语或其它语言。

伪代码：是用介于自然语言和计算机语言之间的文字和符号（包括数学符号）来描述算法。

例1用伪代码表示

Begin算法开始Ifa(0)>a(1)则a(0)->Max否则a(1)->MaxIfa(2)>Max则a(2)->MaxEnd算法结束2021/7/9102.1.4算法的表示1）用自然语言及伪代码来表示2021/2）用传统流程图来表示

1、传统流程中的基本符号起止框I/O框流程线处理框判断框2021/7/9112）用传统流程图来表示起止框I/O框流程线处理框判断框202

2、三种基本结构的表示

顺序结构选择结构语句1语句2条件语句1语句2YN2021/7/9122、三种基本结构的表示顺序结构选择结构语句1语句2条件语句循环结构当循环

直道循环条件(a)YN语句组条件语句组YN(b)2021/7/913循环结构当循环直道循环条件(a)YN语句组条件语句组Y三种基本结构的特点：只有一个入口只有一个出口不存在死语句不存在死循环从10个数中选出最大的数的算法流程图N<10Max=AN=1A>MaxMax=A输入A再输入给AN=N+1结束YNNY开始打印Max2021/7/914三种基本结构的特点：只有一个入口从10个数中选出最大的数的算3）用N—S流程图表示

将全部算法写在一个矩形框内，在矩形内还可包含其它从属于它的框。三种基本结构的N—S图表示：

语句A语句B循序结构选择结构语句A语句B条件YN2021/7/9153）用N—S流程图表示

将全部算法写在一个矩形框内，循环结构

当循环直道循环语句组当条件成立语句组直到当条件成立例4画出从10个数中选出最大的数的N—S流程图2021/7/916循环结构

当循环直道循环语句组当条件成立语句组直到当条件成立传统流程图N<10Max=AN=1A>MaxMax=A输入A开始再输入给AN=N+1输出Max结束YNNY输入A当N<10Max=AN=N+1打印MaxMax=A,N=1N—S流程图A>MaxYN输入A2021/7/917传统流程图N<10Max=AA>MaxMax=A输入A开2.2测量程序中几种常用算法2.2.1数据文件操作（读写文件）

数据在计算机里的存储格式五花八门。如Image，它可以以Bmp、Jpeg、Tif等格式来存储；又如对于GPS数据文件，不同的仪器型号，它的数据记录格式一般是不一样的。

测量程序处理的对象主要为野外采集原始数据。（外业观测数据、已知数据以及网形数据）。计算的开始、结束以及计算过程中，会涉及数据的读取、存储（中间计算结果）以及输出（成果）。那么我们进行程序设计时以哪种形式的文件来存储数据呢？数据在存储到文件中又怎样来组织呢?2021/7/9182.2测量程序中几种常用算法2.2.1数据文件操作（读在VB6.0中读取该格式的文本数据要到:CommonDialog外部控件、For循环、While…loop以及lineInput语句2021/7/919在VB6.0中读取该格式的文本数据要到:CommonDial文本操作算法流程NYYN2021/7/920文本操作算法流程NYYN2021/7/9202.2.2矩阵运算

对矩阵运算进行编程实现时，一般需在内存中申请一块连续的空间来存储矩阵中各个元素。在C++语言中，可以定义一个指针来指向内存中所申请的地址；在VB中，可利用数组（可以用一维数组，也可以用二维数组）存储矩阵中的各个元素。A(0)A(1)A(2)A(n)….

一维数组在内存中存放的顺序2021/7/9212.2.2矩阵运算对矩阵运算进行编程实现时1）两矩阵相加

矩阵A、B相加就是矩阵对应的元素相加即可实现。fori=0tom-1forj=0ton-1c(i,j)=a(i,j)+b(i,j)

nextnextN矩阵相加流程2021/7/9221）两矩阵相加矩阵A、B相加就是矩阵对应的元素相加即2）两矩阵相减矩阵A、B相加就是矩阵对应的元素相加即可实现。fori=0tom-1forj=0ton-1c(i,j)=a(i,j)-b(i,j)

nextnextN矩阵相减流程2021/7/9232）两矩阵相减矩阵A、B相加就是矩阵对应的元素相3）矩阵转置

通过将a(i,j)元素放到b(j1,i1)即可实现矩阵转置。在VB实现时先定义一个存储a(i,j)转置后的矩阵b(j,i)。

fori=0tom-1forj=0ton-1b(i,j)=a(j,i) nextnext2021/7/9243）矩阵转置通过将a(i,j)元素放到b(j1,i1)即4）矩阵相乘

矩阵A有m*l个元素，矩阵B有l*n个元素，则矩阵C=A*B有m*n个元素,矩阵C中任一元素

(i=1,2,…,m;j=1,2,…,n)

两矩阵相乘流程fori=1tomforj=1tonc(i,j)=0fork=1tolc(i,k)=c(i,j)+a(i,k)*b(k,j)nextk:nextj:Nexti2021/7/9254）矩阵相乘矩阵A有m*l个元素，矩阵B有l*n个元素

定义四个变量b,c,d,M分别存储度、分、秒以及最终结果。2.2.3不同单位角度的转化度分秒转度M=a+c/60+d/3600度分秒转弧度

定义四个变量b,c,d,M分别用来存储度、分、秒及最终结果。M=a+c/60+d/3600M=M*3.1415/1802021/7/926定义四个变量b,c,d,M分别存储度、分、秒DimAnyString,MyStrAnyString="HelloWorld"'Definestring.MyStr=Left(AnyString,1)'Returns"H".MyStr=Left(AnyString,7)'Returns"HelloW".MyStr=Left(AnyString,20)'Returns"HelloWorld".*************************DimAnyString,MyStrAnyString="HelloWorld"'Definestring.MyStr=Right(AnyString,1)'Returns"d".MyStr=Right(AnyString,6)'Returns"World".MyStr=Right(AnyString,20)'Returns"HelloWorld".

VB中字符串操作函数:Left()、Mid()、Split()、Right()类型转换函数：CDbl(expression)、CInt(expression)、CLng(expression)、CStr(expression)；Str(number)2021/7/927DimAnyString,MyStrVB中字符串操作函2.2.4排序算法1）选择法排序（升序）

基本思想：（1）对有n个数的序列（存放在数组a(n)中），从中选出最小的数，与第1个数交换位置；75346891排序开始前a(n)：第1遍交换后：75346891712021/7/9282.2.4排序算法1）选择法排序（升序）753468（2）第二遍时，除第1个数外，其余n-1个数中选最小的数，与第2个数交换位置；7354689171第2遍交换后：（3）依次类推，选择了n-1遍后，这个数列已按升序排列。2021/7/929（2）第二遍时，除第1个数外，其余n-1个数中选最小的数，

选择法排序算法的流程图2021/7/930选择法排序算法的流程图2021/7/930选择法排序（升序）的VB程序：fori1=1ton-1‘n-1趟遍历P=i1 fori2=i1+1ton‘1次遍历 ifa(P)>a(i2)then P=i2endif nexti2temp=a(i1):a(i1)=a(P):a(P)=tempnexti1思考：选择排序降序算法怎样？2021/7/931选择法排序（升序）的VB程序：fori1=1ton-2）冒泡排序（升序）基本思想：(将相邻两个数比较，小的调到前头)（1）有n个数（存放在数组a(n)中），第一趟将每相邻两个数比较，小的放到前头，经n-1次两两相邻比较后，最大的数已“沉底”，放在最后一个位置，小数上升“浮起”；（2）第二趟对余下的n-1个数（最大的数已“沉底”）按上法比较，经n-2次两两相邻比较后得次大的数；（3）依次类推，n个数共进行n-1趟比较，在第j趟中要进行n-j次两两比较。

2021/7/9322）冒泡排序（升序）基本思想：(将相邻两个数比较，小的调到冒泡排序（升序)VB程序：

fori=1ton-1‘n-1趟遍历forj=1ton-i‘1次遍历 ifa(j)>a(j+1)then temp=a(j+1)a(j+1)=a(j)a(j)=tempendifnextjnexti2021/7/933冒泡排序（升序)VB程序：2021/7/9333）合并法排序（将两个有序数组A、B合并成另一个有序的数组C，升序）基本思想：（1）先在A、B数组中各取第一个元素进行比较，将小的元素放入C数组；（2）取小的元素所在数组的下一个元素与另一数组中上次比较后较大的元素比较，重复上述比较过程，直到某个数组被先排完；（3）将另一个数组剩余元素抄入C数组，合并排序完成。

2021/7/9343）合并法排序（将两个有序数组A、B合并成另一个有序的数组两个有序数组A、B合并成一个有序数组C，VB实现的程序：DoWhileia<=UBound(A)Andib<=UBound(B)'当A和B数组均未比较完IfA(ia)<B(ib)ThenC(ic)=A(ia)：ia=ia+1ElseC(ic)=B(ib)：ib=ib+1EndIfic=ic+1Loop

2021/7/935两个有序数组A、B合并成一个有序数组C，VB实现的程序：DDoWhileia<=UBound(A)'A数组中的剩余元素抄入C数组C(ic)=A(ia)ia=ia+1ic=ic+1LoopDoWhileib<=UBound(B)'B数组中的剩余元素抄入C数组C(ic)=B(ib)ib=ib+1：ic=ic+1Loop2021/7/936DoWhileia<=UBound(A)'A2.2.5坐标方位角计算坐标方位角MN：是指坐标北到某一向量的角度，范围为0～360o。假若存在两点M(xm,ym)与N(xn,yn)，求取方位角……(1)……(2)2021/7/9372.2.5坐标方位角计算坐标方位角MN：是……..(3)………(4)其中，

从(2)、(3)、(4)式计算求得的方位角都有一定的局限性，就是计算的结果不一定是真正的坐标方位角，都要进行象限判断后加上一定的数值后，才能变成真正的坐标方位角。2021/7/938……..(3)………(4)其中，从(2)、(3)改进后的计算公式:式中,sgn()为取符号函数,即，

通过以上分析，应用式(5)计算时,除第1象限结果大于360度外,其它象限,计算出的方位角都是真方位角，即使在大于360时,-360也为第一象限真方位角。……..(5)a=Atan((YN-YM)/(XN-XM))+180*2(1+sgn(xn-xm))/2。注意：当xn，xm不相等时，可采此算法，当xn与xm相等时，在编程时需单独考虑。2021/7/939改进后的计算公式:式中,sgn()为取符号函数,即，若方位角采用改进后的式（5）来计算，VB程序为：

FunctionQfangweijiao(xnAsDouble,ynAsDouble,xmAsDouble,ymAsDouble)AsDoubleDimcAsDoublec=gn(xn,xm)Qfangweijiao=Atn((yn-ym)/(xn-xm))+180*cEndFunctionFunctiongn(r1AsDouble,r2AsDouble)Ifr1-r2>0Thengn=2ElseIfr1-r2<0Thengn=1EndIfEndFunction

2021/7/940若方位角采用改进后的式（5）来计算，VB程序为：202参考的资料1、殷人昆等.数据结构（用面向对象方法与C++描述）.清华大学出版社，20032、宋力杰.测量平差程序设计.国防工业出版社，20093、同济大学应用数学系编.线性代数.高等教育出版社，20054、葛永慧等.测绘编程基础.测绘出版社，20022021/7/941参考的资料2021/7/9411）熟悉VB编程的基本思路；2）数据文件的建立、读取；3）变量的定义、动态数组的定义与应用；4）矩阵的加、减、乘运算(定义Sub()子过程或Function()来实现)；上机内容一（基本知识练习）2021/7/9421）熟悉VB编程的基本思路；上机内容一（基本知识练习）202问题？问题？第二章测量程序基本算法本章重点

算法的概念及特性，数据文件的建立、读写，矩阵运算，排序算法，坐标方位角的计算2021/7/944第二章测量程序基本算法本章重点2021/7/912.1算法（Algorithm）及其表示2.1.1概念广义地讲：算法是为完成一项任务所应尊循的一步一步的、规则的、精确的、无歧异的描述，它的总步数是有限的。狭义地讲：算法是解决一个问题采取的方法和步骤的描述。2021/7/9452.1算法（Algorithm）及其表示2.1.1概念2例1：找出三个数中的最大的数。

假如三个数已存放在数组a(2)中了，用Max存储最大的数。

算法设计如下：

1）比较a(0)与a(1)，将大的数放到Max中；

2）比较Max与a(2)，若Max小于a(2)，将a(2)赋值给Max。

例2：输入10个数，输出其中最大的数。算法设计如下：

1）输入一个数，存入变量A中，将记录数据个数的变量N赋值为1，即N=1；2021/7/946例1：找出三个数中的最大的数。2021/7/93

2）将A存入表示最大值的变量Max中，即Max=A；3）再输入一个值给A，如果A>Max则Max=A,否则Max不变；4）让记录数据个数的变量增加1，即N=N+1；5）判断N是否小于等于10，若成立则转到第（3）步执行，否则转到第（6）步；

6）输出max。2021/7/9472）将A存入表示最大值的变量Max中，即Max=A；202.1.2算法的特性有穷性

对于任意一组合法输入值，在执行有穷步骤之后一定能结束，即：算法中的每一步骤都能在有限时间内完成。确定性

对于每种情况下所应执行的操作，在算法中都有确切的规定，使算法的执行者或阅读者都能明白其含义以及如何执行。2021/7/9482.1.2算法的特性有穷性2021/7/95可行性算法中的所有操作都必须足够基本，都可以通过已经实现的基本操作运算有限次实现它。有输入作为算法加工对象的量值，通常体现为算法中的一组变量。有些输入量需要在算法执行过程中输入，而有的算法表面上可以没有输入，实际上已经被嵌入算法中。有输出它是一组与“输入”有确定关系的量值，是算法进行信息加工后得到的结果，这种确定关系即为算法的功能。2021/7/949可行性2021/7/962.1.3算法设计的原则设计算法时，通常应考虑达到以下目标：1、正确性对算法是否“正确”的理解可以有以下四个层次：a.程序中不含语法错误；b.程序对于几组输入数据能够得到出满足要求的结果；c.程序对于精心选择的、典型、苛刻且带有刁难性的几组输入数据能够得出满足要求的结果；d.程序对于一切合法的输入数据都能得出满足要求的结果；2021/7/9502.1.3算法设计的原则设计算法时，通常应考虑达到以下目标：2、可读性

算法主要是为了人的阅读与交流，其次才是为计算机执行。因此算法应该易于人的理解；另一方面，晦涩难度的程序易于隐藏较多错误而难以调试；3、健壮性当输入的数据非法时，算法应当恰当地作出反应或进行相应处理，而不是产生莫名其妙的输出结果。并且，处理出错的方法不应是中断程序的执行，而应是返回一个表示错误或错误性质的值，以便在更高的抽象层次上进行处理。2021/7/9512、可读性2021/7/984、高效率与低存储量需求

通常，算法的效率指的是算法执行时间；存储量指的是算法执行过程中所需的最大存储空间。两者都与问题的规模有关。2021/7/9524、高效率与低存储量需求2021/7/992.1.4算法的表示1）用自然语言及伪代码来表示

自然语言：是指人们日常使用的语言，可以是汉语、英语或其它语言。

伪代码：是用介于自然语言和计算机语言之间的文字和符号（包括数学符号）来描述算法。

例1用伪代码表示

Begin算法开始Ifa(0)>a(1)则a(0)->Max否则a(1)->MaxIfa(2)>Max则a(2)->MaxEnd算法结束2021/7/9532.1.4算法的表示1）用自然语言及伪代码来表示2021/2）用传统流程图来表示

1、传统流程中的基本符号起止框I/O框流程线处理框判断框2021/7/9542）用传统流程图来表示起止框I/O框流程线处理框判断框202

2、三种基本结构的表示

顺序结构选择结构语句1语句2条件语句1语句2YN2021/7/9552、三种基本结构的表示顺序结构选择结构语句1语句2条件语句循环结构当循环

直道循环条件(a)YN语句组条件语句组YN(b)2021/7/956循环结构当循环直道循环条件(a)YN语句组条件语句组Y三种基本结构的特点：只有一个入口只有一个出口不存在死语句不存在死循环从10个数中选出最大的数的算法流程图N<10Max=AN=1A>MaxMax=A输入A再输入给AN=N+1结束YNNY开始打印Max2021/7/957三种基本结构的特点：只有一个入口从10个数中选出最大的数的算3）用N—S流程图表示

将全部算法写在一个矩形框内，在矩形内还可包含其它从属于它的框。三种基本结构的N—S图表示：

语句A语句B循序结构选择结构语句A语句B条件YN2021/7/9583）用N—S流程图表示

将全部算法写在一个矩形框内，循环结构

当循环直道循环语句组当条件成立语句组直到当条件成立例4画出从10个数中选出最大的数的N—S流程图2021/7/959循环结构

当循环直道循环语句组当条件成立语句组直到当条件成立传统流程图N<10Max=AN=1A>MaxMax=A输入A开始再输入给AN=N+1输出Max结束YNNY输入A当N<10Max=AN=N+1打印MaxMax=A,N=1N—S流程图A>MaxYN输入A2021/7/960传统流程图N<10Max=AA>MaxMax=A输入A开2.2测量程序中几种常用算法2.2.1数据文件操作（读写文件）

数据在计算机里的存储格式五花八门。如Image，它可以以Bmp、Jpeg、Tif等格式来存储；又如对于GPS数据文件，不同的仪器型号，它的数据记录格式一般是不一样的。

测量程序处理的对象主要为野外采集原始数据。（外业观测数据、已知数据以及网形数据）。计算的开始、结束以及计算过程中，会涉及数据的读取、存储（中间计算结果）以及输出（成果）。那么我们进行程序设计时以哪种形式的文件来存储数据呢？数据在存储到文件中又怎样来组织呢?2021/7/9612.2测量程序中几种常用算法2.2.1数据文件操作（读在VB6.0中读取该格式的文本数据要到:CommonDialog外部控件、For循环、While…loop以及lineInput语句2021/7/962在VB6.0中读取该格式的文本数据要到:CommonDial文本操作算法流程NYYN2021/7/963文本操作算法流程NYYN2021/7/9202.2.2矩阵运算

对矩阵运算进行编程实现时，一般需在内存中申请一块连续的空间来存储矩阵中各个元素。在C++语言中，可以定义一个指针来指向内存中所申请的地址；在VB中，可利用数组（可以用一维数组，也可以用二维数组）存储矩阵中的各个元素。A(0)A(1)A(2)A(n)….

一维数组在内存中存放的顺序2021/7/9642.2.2矩阵运算对矩阵运算进行编程实现时1）两矩阵相加

矩阵A、B相加就是矩阵对应的元素相加即可实现。fori=0tom-1forj=0ton-1c(i,j)=a(i,j)+b(i,j)

nextnextN矩阵相加流程2021/7/9651）两矩阵相加矩阵A、B相加就是矩阵对应的元素相加即2）两矩阵相减矩阵A、B相加就是矩阵对应的元素相加即可实现。fori=0tom-1forj=0ton-1c(i,j)=a(i,j)-b(i,j)

nextnextN矩阵相减流程2021/7/9662）两矩阵相减矩阵A、B相加就是矩阵对应的元素相3）矩阵转置

通过将a(i,j)元素放到b(j1,i1)即可实现矩阵转置。在VB实现时先定义一个存储a(i,j)转置后的矩阵b(j,i)。

fori=0tom-1forj=0ton-1b(i,j)=a(j,i) nextnext2021/7/9673）矩阵转置通过将a(i,j)元素放到b(j1,i1)即4）矩阵相乘

矩阵A有m*l个元素，矩阵B有l*n个元素，则矩阵C=A*B有m*n个元素,矩阵C中任一元素

(i=1,2,…,m;j=1,2,…,n)

两矩阵相乘流程fori=1tomforj=1tonc(i,j)=0fork=1tolc(i,k)=c(i,j)+a(i,k)*b(k,j)nextk:nextj:Nexti2021/7/9684）矩阵相乘矩阵A有m*l个元素，矩阵B有l*n个元素

定义四个变量b,c,d,M分别存储度、分、秒以及最终结果。2.2.3不同单位角度的转化度分秒转度M=a+c/60+d/3600度分秒转弧度

定义四个变量b,c,d,M分别用来存储度、分、秒及最终结果。M=a+c/60+d/3600M=M*3.1415/1802021/7/969定义四个变量b,c,d,M分别存储度、分、秒DimAnyString,MyStrAnyString="HelloWorld"'Definestring.MyStr=Left(AnyString,1)'Returns"H".MyStr=Left(AnyString,7)'Returns"HelloW".MyStr=Left(AnyString,20)'Returns"HelloWorld".*************************DimAnyString,MyStrAnyString="HelloWorld"'Definestring.MyStr=Right(AnyString,1)'Returns"d".MyStr=Right(AnyString,6)'Returns"World".MyStr=Right(AnyString,20)'Returns"HelloWorld".

VB中字符串操作函数:Left()、Mid()、Split()、Right()类型转换函数：CDbl(expression)、CInt(expression)、CLng(expression)、CStr(expression)；Str(number)2021/7/970DimAnyString,MyStrVB中字符串操作函2.2.4排序算法1）选择法排序（升序）

基本思想：（1）对有n个数的序列（存放在数组a(n)中），从中选出最小的数，与第1个数交换位置；75346891排序开始前a(n)：第1遍交换后：75346891712021/7/9712.2.4排序算法1）选择法排序（升序）753468（2）第二遍时，除第1个数外，其余n-1个数中选最小的数，与第2个数交换位置；7354689171第2遍交换后：（3）依次类推，选择了n-1遍后，这个数列已按升序排列。2021/7/972（2）第二遍时，除第1个数外，其余n-1个数中选最小的数，

选择法排序算法的流程图2021/7/973选择法排序算法的流程图2021/7/930选择法排序（升序）的VB程序：fori1=1ton-1‘n-1趟遍历P=i1 fori2=i1+1ton‘1次遍历 ifa(P)>a(i2)then P=i2endif nexti2temp=a(i1):a(i1)=a(P):a(P)=tempnexti1思考：选择排序降序算法怎样？2021/7/974选择法排序（升序）的VB程序：fori1=1ton-2）冒泡排序（升序）基本思想：(将相邻两个数比较，小的调到前头)（1）有n个数（存放在数组a(n)中），第一趟将每相邻两个数比较，小的放到前头，经n-1次两两相邻比较后，最大的数已“沉底”，放在最后一个位置，小数上升“浮起”；（2）第二趟对余下的n-1个数（最大的数已“沉底”）按上法比较，经n-2次两两相邻比较后得次大的数；（3）依次类推，n个数共进行n-1趟比较，在第j趟中要进行n-j次两两比较。

2021/7/9752）冒泡排序（升序）基本思想：(将相邻两个数比较，小的调到冒泡排序（升序)VB程序：

fori=1ton-1‘n-1趟遍历forj=1ton-i‘1次遍历 ifa(j)>a(j+1)then temp=a(j+1)a(j+1)=a(j)a(j)=tempendifnextjnexti2021/7/976冒泡排序（升序)VB程序：2021/7/9333）合并法排序（将两个有序数组A、B合并成另一个有序的数组C，升序）基本思想：（1）先在A、B数组中各取第一个元素进行比较，将小的元素放入C数组；（2）取小的元素所在数组的下一个元素与另一数组中上次比较后较大的元素比较，重复上述比较过程，直到某个数组被先排完；（3）将另一个数组剩余元素抄入C数组，合并排序完成。

2021/7/9773）合并法排序（将两个有序数组A、B合并成另一个有序的数组两个有序数组A、B合并成一个有序数组C，VB实现的程序：DoWhileia<=UBound(A)Andib<=UBound(B)'当A和B数组均未比较完IfA(ia)<B(ib)ThenC(ic)=A(ia)：ia=ia+1ElseC(ic)=B(ib)：ib=ib+1EndIf