高中算法与程序设计VB选修复习知识点

高中信息技术《算法及程序设计VB（选修）》知识要点相关知识点（一）算法1.定义相关题解：1算法：就是解决问题的方法和步骤。算法是程序设计的“灵魂”，算法+数据结构＝程序。单选题1,下列关于算法说法不正确的是(A)A,算法独立于任何详细的语言，BASIC算法只能用BASIC语言来实现B,解决问题的过程就是实现算法的过程C,算法是程序设计的“灵魂”D,其它三项都正确2．算法的描述方法：1算法的描述：可分多种表达方法，一般用自然语言,流程图和伪代码进行描述。2自然语言描述法：指用人们日常生活中运用的语言（本国语言），用自然语言描述符合我们的习惯，且简单理解。3流程图描述：也称程序框图，它是算法的一种图形化表示方法。且描述算法形象,直观，更易理解。4伪代码描述法：是介于自然语言和计算机程序语言之间的一种算法描述。是专业软件开发人员常用方法。SHAPE输入或输出输入或输出推断处理或运算连接点流程线开始或结束相关题解：单选题1,图形符号""在算法流程图描述中表示(B).A处理或运算的功能B输入输出操作C用来推断条件是否满意需求D算法的开始或结束2,图形符号""在算法流程图描述中表示(A).A处理或运算的功能B输入输出操作C用来推断条件是否满意需求D算法的开始或结束3,以下哪个是算法的描述方法(A)A流程图描述法B枚举法C顺序法D列表法4,以下哪个是算法的描述方法(D)A顺序法B列表法C集合法D自然语言描述法（二）程序设计基础（1）常用高级编程语言：BASIC,VB,Pascal,C,C++,Java1面对对象的程序设计语言：其中的对象主要是系统设计好的对象，包括窗体等,控件等2控件：是指工具箱中的工具在窗体中画出的,能实现一定功能的部件，如文本框，命令按钮等。常用控件：控件对象的类型前缀名字举例窗体Formfrmfrmfind命令按钮Commandbuttoncmdcmdok标签Labellbllblinput文本框TextBoxtmrtmrClock若命令按钮(Command)的Enabled属性设置为True时按钮有效，设置为False时按钮无效3对象的属性,方法和事务1属性属性Name设置对象的名称Caption确定控件中显示的内容（文字）Text确定窗体中文本框中显示的内容(初始为空白)Height确定控件高度Width确定控件宽度TOP确定控件的靠顶部位置Left确定控件的靠左边位置Font设置控件中字体格式BackColor设置控件背景色ForeColor设置控件的前景色BorderStyle设置控件的边框风格Alignment即标签文字对齐属性：(0)LeftJustify时文本左对齐；(1)RightJustify时文本右对齐；设置为(2)Center时文本居中。AutoSize设置为False时输入控件Caption中文字超过控件宽度时超出部分被裁剪掉，设置为True时，控件可水平扩充，以适应控件Caption属性。Visible确定控件是否可见Enabled确定控件运行时是否有效对象.属性＝属性值对象中属性可以在设计界面时通过属性窗中设置，也可以在运行时通过程序代码设置,方法如下例：给文本框“Txt123”的“Text”属性赋值为字符串“20”，代码如下Txt123.text=”20”变量＝对象.属性假如要获得对象的状态或特性，这时就要读取对象的属性值，方法如下例：读取文本框“txt123”的“Text”属性的代码如下a=txt123.text2方法［对象］.方法［参数名表］例：form.print”欢迎运用”该语句运用print方法在form1窗体中显示字符串“欢迎运用”3事务及事务驱动事务是对象对外部操作的响应，如在程序执行时，单击命令按钮会产生一个Click事务。如须要命令按钮响应Click事务，就把完成Click事务功能的代码写到Click事务的事务过程中，及事务一一对应。事务过程的形式如下：PrivateSub对象_事务名()……………（事务过程代码）EndSub一个简单的VB程序求圆的周长和面积PrivateSubCommand1_Click()DimrAsSingle'定义r为单精度型DimcAsSingle'定义c为单精度型DimsAsSingle'定义s为单精度型r=Val(Text1.Text)'输入半径rc=2*3.14159*r'计算周长s=3.14159*r*r'计算面积Text2.Text=c'输出周长Text3.Text=s'输出面积EndSubPrivateSubCommand2_Click()End'退出EndSub相关题解：单选题1,下列关于程序设计说法正确的是(B)。A,程序设计语言的发展经验了机器语言,汇编语言到高级语言的过程，比较流行的高级语言是PASCAL,FORTRAN,EXCEL,C++等B,程序设计就是寻求解决问题的方法，并将其实现步骤编写成计算机可以执行的程序的过程C,程序设计语言和计算机语言是同一个概念的两个方面D,程序设计就是指示计算机如何去解决间题或完成一组可执行指令的过程2,下列说法错误的是（D）.A,程序设计就是寻求解决问题的方法，并将其实现步骤编写成计算机可以执行的程序的过程B,程序设计语言的发展经验了机器语言,汇编语言,高级语言的过程C,计算机程序就是指计算机如何去解决间题或完成一组可执行指令的过程D,程序设计语言和计算机语言是同一概念的两个方面一,常量：批在程序进行过程中不变的量在VB中一般分数值常量及字符常量两种数值常量：就是数学中说的常数，分整型常量和实型常量两种整型常量：即整数，指不带小数点的数值如1,0,,-10,+35等都是合法的整数实型常量：即实数，指带小数点的数值。实型常量又分为定点数和浮点数两种。例：定点数：3.14159和-6.8，1.99浮点数：2E6,1E5,88E例：1.2345×103可表示为1.2345E3，字母E表示底数10浮点数就是数学上的科学计数法。字符串常量：被一对双引号括起来的若干个合法的字符称为字符串常量。例如：”China”,”VisualBasic”,”18”,”3.1415”等，双引号中字符，不包括双引号本身。

符号常量：假如多次用到同一个常量，则可用一个有意义的名字表示这个常量。二,变量：在程序执行过程中，其值可以改变的量称为变量变量命名留意要点：1,必需以字母开头,不能以数字或其他字符开头。2,只能由字母,汉字,数字学或下划线组成，不能含有小数点,空格等字符。3,最长不超过255个字符4,不能以VB保留字作变量名，如语句定义符,函数名等。5,VB不区分变量名中字母大小写。如HELLO和Hello是同一个变量。数据及运算（1）常用数据类型：(整型)Integer,（长整型）Long,（单精度型）Single,（双精度型）Double,（字符串型）String,（布尔型）Boolean,（日期型）Date其中(整型)Integer,（长整型）Long,（单精度型）Single,（双精度型）Double属于数值型表示范围：(整型)Integer(-32768——32767，存储为16位，2个字节)(长整型)Long(-21亿——21亿，可以表示人口数量)(布尔型）Boolean(True真,是或False假,非)（字符串型）String(定长字符串：0——65535个字符，不定长字符串：0——20亿个字符)字符串型数据是指用“”括起来的一串字符。如“欢迎进入VB世界！”,“VisualBasic”,“1234”都是字符串类型。（日期型）Date（100/1/1——9999/12/31）日期型数据特地用来处理日期和时间。VB采纳一对“#”把日期和时间的值括起来，如#2003/08/20#表示20038月20日。（2）常量和变量的命名,声明及赋值符号常量的声明：Const常量名[As常量类型]=常量值如：ConstpiAsSingle=3.14159常量名为pi变量的声明：Dim<变量名>As<变量类型>如：DimaAsInteger定义一个整型变量，变量名为a变量的赋值VB中运用Let语句给变量赋值，其形式如下：[Let]变量=表达式其中，方括号[]表示这部分内容是可选的，通常可以省略该关键字。例题PrivateSubForm_Click()DimaAsInteger,bAsInteger,cAsIntegerDimstrAsStringLeta=54Letb=114c=a+bstr="HelloWorld"Print"a=";a,"b=";b,"c=";cPrintstrEndSub数据的输出程序中运算得到的结果，除可以运用文本框和标签显示外，对于大批量的数据更适合用Pint方法输出，格式如下[对象].Pint[表达式列表]例题：PrivateSubForm_Click()DimxAsSingle,yAsSingleForm1.Print-61;-34Form1.Print9*2;12Form1.Print"Thisis";"abook"x=3:y=4Print"x=";x,"y=";yEndSub留意：Print方法相关题解：单选题1,下列变量名写法错误的是(B)A,abc_123B,123abcC,abc123D,abc2,下列语句中定义了一个实型变量的是(B)A,DimendasIntegerB,DimsumAsSingleC,DimNameAsStringD,其它三项都不对3,在VB中，以下哪个是正确表示十六进制整型数常量(D)A,32FB,H32FC,h32FD,&32F4,在VB中，以下关于符号常量的声明，声明正确的是:(C)A,DimTAGasStringB,ConstTAGasString"Visual"+"Basic"C,ConstTAGasString="VisualBasic"D,ConstTAGasString5,下面(B)不是字符串常量A,"True"B,#False#C,""D,"你好"运算符算术运算：+加--减*乘^指数例：2^2=4/（浮点）除例：5/2=2.5\整除例：5\2=2Mod求余数例：5Mod2=1相关题解单选题1,分析下列程序:PrivateSubForm_Click()s=11\3+11Mod3PrintsEndSub当单击窗体时s的值是(A).A,5B,6C,4D,3关系运算=赋值,<小于号<>不等于>大于号>=大于等于号<=小于等于号留意：关系表达式的运算结果为布尔值True或False例：3>2结果为True(真或是)相关题解单选题1,下面表达式的值是false的有(C).A,"969"<"n97"B,Int(4.99)<>len("basic")C,str(2000)<"1997"D,3>2逻辑运算Not（取反）And（及）Or（或）运算结果为布尔型（Boolean）True或False逻辑运算符的优先级为：No>And>Or日期运算符及日期表达式日期表达式是用日期运算符“+”或“-”将算式表达式,日期型常量,日期型变量,日期函数等连接起来的式子，如表达式“#2003/09/01#+30”的运算结果是“2003-10-1”；表达式“#2003/10/20#-#2003/10/10#”的运算结果为整数10相关题解单选题1,设a=2,b=3,在VB中，表达式a>bOrb>3值是:(B)A,FalseB,TrueC,-1D,1字符运算字符串连接符为“+”和“&”“123”+“45”=“12345”“123”&“45”=“12345”123+“45”=168“123”+45=168运算符的执行顺序在VB中，当一个表达式中同时出现多种运算符时，运算次序由运算符的优先级确定，优先级高的运算符先运算，优先级相同的从左向右进行运算。不同性质的运算符优先级如下。算术运算符>字符串运算符>

关系运算符>

逻辑运算符常用函数数学函数Abs(x)求x的一定值，例：abs(-3.6)=3.6Sqr(x)求x的平方根，例：sqr(100)=10Int(x)求≤x的最大整数例：int(3.6)=3int(--3.6)=--4Rnd(x)产生[0，1)之间的随机数（不包括1）Sin(x)Cos(x)Tan(x)Atn(x)Exp(x)Log(x)运用三角函数时，参数应是弧度，如数学中sin300应写为：sin(30*3.14159/180)字符串函数Len(字符串)求字符串的长度,例：Len(“hello”)=5Left(字符串，截取长度)截取字符串左边部分,例:Left(“hello”,2)=“he”Mid(字符串，起始位置，截取长度),例：Mid(“hello”,2,2)=“el”其他：Right(字符串,长度)截取字符串右边部分。例:Right(“hello”,2)=“lo”String(数值，字符)生成指定长度及指定字符的字符串，例：String(3,”9”)=”999”常用转换函数Val(字符串)将字符串转换为数值Str(数值)将数值转换为字符串Chr(字符代码)Asc(字符)Tab定位函数的运用例题PrivateSubForm_Click()DimaAsIntegerDimbAsIntegera=4:b=9PrintTab(1);"数";Tab(9);"平方";Tab(18);"立方";Tab(27);"平方根"PrintTab(1);a;Tab(9);a*a;Tab(18);a*a*a;Tab(27);Sqr(a)PrintTab(1);b;Tab(9);b*b;Tab(18);b*b*b;Tab(27);Sqr(b)EndSub用户交互函数VB供应InputBox()和MsgBox()函数用于人机交互InputBox()其语法格式为：InputBox(提示[，标题][，默认值][,X坐标][，Y坐标])MsgBox()其语法格式为：MsgBox(提示信息[，按钮][，标题])相关题解单选题1,VisualBasic中，下列(A)函数是求一定值的。A,ABS（X）B,SQR(X）C,INT（X）D,GN（X)2,表达式Abs(-3.6)*sqr(100)的值是(C)。A,-36B,360C,36D,-3603,下列(A)数据类型不是数值型。A,DateB,SingleC,DoubleD,Integer4,下列函数中，返回值是字符串的是(A).A,MidB,InstrC,ValD,Len5,下列(A)函数返回系统的当前时间。A,time()B,date()C,day()D,year()6,代数表达式表达式后错误的是(D)A,g*t*t/2B,1/2*g*t^2C,g*t^2/2D,gt^2/27,数学式子在VB中的正确写法是：（）A,(2*a+b)/4*aB,(2*a+b)/(4ab)C,(2a+b)(4ab)D,(2*a+b)/(4*a*b)8,推断x是否在区间[a,b]上，在VB中以哪个逻辑表达式是正确的(C)A,a<xandx<=bB,a<x<=bC,a<xandx≤bD,a>xandx<=b综合分析1,向n变量存入1个2位整数，要使此2位数十位和个位上的值分别存入x,y变量。正确的算法是(D)。选项:x,①x=Left(n,1)②y=n-x*10③Printx:PrintyB,①x=Left(n,1)②y=Right(n,1)③Printx:PrintyC,①x=n/10②y=n-x*10③Printx:PrintyD,①x=Int(n/10)②y=n-x*10③Printx:Printy2,向x变量中输入随意一个小写字母，再将x变量中的小写字母转成大写字母。正确的算法是(A).选项:A,①输人字母到x②a=Asc(x)-32③x=chr(x)④PrintxB,①输人字母到x②a=Asc(x)+32③x=chr(x)④PrintxC,①输人字母到x②a=Val(x)一32③x=Chr(x)④PrintxD,①输人字母到x②a=Val(x)+32③x=Chr(x)④Printx程序设计的顺序结构顺序结构：代码依据由上到下的顺序一行一行地执行。程序执行过程中没有分支,没有重复，这种结构称为顺序结构。例题：交换两个变量中的数据。PrivateSubcmdSwap_Click()DimxAsSingle,yAsSingleDimmAsSinglex=Val(txtsx.Text)y=Val(txtsy.Text)m=x:x=y:y=m'交换数据txtdx.Text=Str(x)txtdy.Text=Str(y)EndSubPrivateSubcmdEnd_Click()EndEndSub相关题解单选题1,以下是一段VB程序：a=1b=a+1c=a+b它的基本结构属于（A）A,顺序结构B,选择结构C,循环结构D,树型结构2,下列VB程序运行后，变量x的值为(A).x=2Printx+lPrintx+2A,2B,3C,5D,8程序设计的分支结构行If语句行If是指在一行中写完的If语句。其一般格式为：格式一：If条件Then语句执行这种形式的If语句时，首先对条件进行推断。若条件成立，则执行Then后面的语句；若条件不成立，则执行If语句后继程序行的语句格式二：If条件Then语句1Else语句2例题：输入三个不相同的数，求出其中最小数。PrivateSubForm_Click()DimaAsSingle,bAsSingle,cAsSingleDimMinAsSinglea=InputBox("输入a","输入框")b=InputBox("输入b","输入框")c=InputBox("输入c","输入框")Ifa<bThenMin=aElseMin=bIfc<MinThenMin=cPrint"最小数＝";MinEndSub执行这种形式的语句时，先进行推断。若条件成立，则执行语句1；否则执行语句2。块If语句上述If-then语句只能依据条件的真假是否执行一条语句，当Then部分和Else部分包含的内容较多时，则可选用“块If语句”结构。格式三：If条件Then语句块EndIf例题：当从输入一个数时，当该数大于或等于60时显示"及格"，该数小于60时显示"不及格"。PrivateSubCommand1_Click()DimaAsSinglea=Val(Text1.Text)Ifa>=60ThenLabel1.Caption="及格"EndIfIfa<60ThenLabel1.Caption="不及格"EndIfEndSub格式四：If条件Then语句块1Else语句块2EndIf例题：编写程序，求函数Y的值（当x≤0时，y=3x+1；当x>0时，y=4x+1）。PrivateSubForm_Click()DimxAsSingleDimyAsSinglex=Val(InputBox("请输入变量x"))Ifx<=0Theny=3*x+1Elsey=4*x+1EndIfPrint"y=";yEndSub相关题解单选题1,以下是一段VisualBasic程序:IfI=1ThenX=X+1ElseX=X*2EndIf它的基本结构属于(A).A,选择结构B,循环结构C,顺序结构D,树型结构2,下列程序段运行后，变量Value的值是（A）x=20Ifx>=10ThenValue=5*xElseValue=4*xEndIfA,100B,80C,90D,70综合分析1,如要完成:从键盘输入一个正整数，推断是否是奇数，如是就在屏幕上显示。比较好的算法是(BD)。选项:A,①输人的数存人n变量②f=(n/2=Int(n/2))③假如f中的值为True就显示n中值B,①输人的数存人n变量②f=(n/2=Int(n/2))③假如f中的值为False就显示n中值C,①输人的数存人n变量②假如n/2=Int(n/2)成立，就显示n中值D,①输人的数存人n变量②假如n/2=Int(n/2)不成立，就显示n中值2,下面是推断变量x是不是能被5整除的偶数的程序，横线上的逻辑表达式应为(AB)PrivateSubcommandl_Click()DimxAsIntegerx=Val(Text1.Text)If____=0ThenLabell.Caption=这个数是能被5整除的偶数ElseLabell.Caption=这个数不是能被5整除的偶数EndIf选项：A,(xMod5)=0And(xMod2)=0B,xMod10=0C,xMod5=0D,xMod2=03,如要完成:从键盘输入一个正整数，推断是否是偶数，如是就在屏幕上显示。比较好的算法是(AC)。选项:A,①输入的数存人n变量②f=(n/2=Int(n/2))③假如f中的值为True就显示n中值B,①输入的数存人n变量②f=(n/2=Int(n/2))③假如f中的值为False就显示n中值C,①输入的数存人n变量②假如n/2=Int(n/2)成立，就显示n中值D,①输入的数存人n变量②假如n/2=Int(n/2)不成立，就显示n中值4,下列程序段运行后,m的值为(A)A=2:b=1:c=5IfA<bThenm=AElsem=bIfc<mThenm=c选项：A,1B,2C,5D,提示错误，无答案程序设计的循环结构一,For-Next循环For循环变量一般形式是：For循环变量=初值To终值Step循环变量增量循环体Nxt循环变量例题1：求s＝1+2+3+4.....+100PrivateSubForm_Click()DimiAsIntegerDimsumAsIntegersum=0Fori=1To100sum=sum+i'循环体NextiPrint"sum=";sumEndSub例题2：Step循环变量增量PrivateSubForm_Click()Forj=3To15Step2PrintjNextjEndSub循环变量的初值,终值,循环变量增量都是数值型。其中要重复执行的操作称为循环体，增量可正可负，假如没有设置Step，则增量的缺省值为1循环变量取初值；循环变量及终值比较，没有超过终值转3，否则循结束，接着执行循环语句的后继语句；执行一次循环体循环变量增加一个增量重复步骤2~4。以上可以看出，For-Next循环变量是一种当型循环。说明For语句及Next语句必需成对出现，而且它们当中的“循环变量”必需是同一个变量，如上例中均为I。当循环变量为正时，循环变量超过终值，是指循环变量的值大于终值时；若为负，则是指循环变量的值小于终值。AAP入口出口二,Do－Loop循环For-Next循环的次数是确定的，但是有的问题只知道循环结束的条件，重复执行的次数事先并不知道，这是须要Do-Loop循环格式一：DoWhile条件循环体Loop例题：求最大公约数PrivateSubCommand1_Click()DimaAsIntegerDimbAsIntegerDimrAsIntegera=Val(Text1.Text)b=Val(Text2.Text)r=aModbDoWhiler<>0a=bb=rr=aModbLoopText3.Text=Str(b)EndSubPrivateSubCommand2_Click()EndEndSub当VB执行DoWhile-Loop循环时，先推断指定的条件是否为真，若条件为真，执行循环体，条件为假时退出循环。格式二：Do循环体LoopUntil条件这种循环的执行过程如图所示。进入循环体后，先执行一次循环体A，然后再检查条件P是否成立。假如不成立，就重复执行循环体A，直到条件P成立退出循环体。SHAPEAPNAPN例题：假如我国人口每以平均1.5%的速度增长，问多少后我国人口达到或超过15亿？设现在人口为12.3亿。PrivateSubForm_Click()DimpAsSingleDimrAsSingleDimnAsIntegerp=1230000000#r=0.015n=0Dop=p*(1+r)n=n+1LoopUntilp>=1500000000#Printn;"后","人口=";pEndSub1,下列流程图表示的是程序的(B)基本结构的算法。A其它三项都不是B循环结构C选择结构D顺序结构2,在VB中，以下程序段:x=0DoWhilex<50x=(x+2)*(x+3)Loop执行后，x的值为:(C).A,168B,50C,72D,03,阅读下面程序，当单击窗体之后，窗体上输出的是(A)PrivateSubForm_Click()DimiAsInteger:DimsAsIntegers=0Fori=1To5s=s+iNextiPrints,iEndSub选项:A,15 6B,s=15i=6C,65D,s=6i=54,要求计算机打印出100至200之问全部偶数的平方根值。正确的算法是(C)。选项:A,①i=100②DoWhilei<200:Printi，Sqr(i):LoopB,①i=100②DoWhilei<200:Printi，Sqr(i):i=i+1:LoopC,Fori=100To200Step2:Printi，Sqr(i):NextiD,Fori=100To200:Printi，Sqr(i):Nexti5,下列程序段中，循环体执行的次数是(B)y=2DoWhiley<=8y=y+yLoop选项:A,2B,3C,4D,56,阅读下面程序，当单击窗体之后，m的值是(C).PrivateSubForm_Click()DimmAsInteger:DimiAsIntegerm=0Fori=1To3m=m+2NextiPrintmEndSub选项：A,0B,4C,6D,87,在VB中，假定有以下程序段:Fori=1To3Step2Print"VB"Nexti则语句Print"VB"的执行次数是：(B)。A,1B,2C,3D,48,下列程序段中，循环体执行的次数是(B)x=0Fory=1To10step-1x=x+1NextyA,1B,0C,10D,49,在VB中，假定有以下程序段:Fori=3To1Print"VB"Nexti则语句Print“VB”的执行次数是:(D)A,出错B,2C,1D,010,下列程序段中，循环体执行的次数是（C）x=0Fory=1To10step-1x=x+1NextyA,1B,10C,0D,411,单击窗体后，文本框Text1,Text2中显示的内容是（A）PrivateSubForm_Click()DimxasInteger,nasIntegerx=1n=0DoWhilex<20n=n+1x=x*3LoopText1.text=Str(x)Text2.text=Str(n)EndSubA,27 3B,3 27C,20 3D,32112,单击窗体后，文本框Text1,Text2中显示的内容是（A）PrivateSubForm_Click()DimxasInteger,yasIntegerx=1:y=0DoWhilex<3y=y+xx=x*3LoopText1.text=Str(x)Text2.text=Str(n)EndSubA,27 3B,3 27C,20 3D,32113,读下面程序，单击窗体后，在文本框显示的内容是（B）PrivateSubForm_Click()Dima(8),b(8)asIntegerDimi,jAsIntegerForj=1To4a(j)=2*jb(j)=a(j)*3NextjText1.Text=b(j/2)EndSubA,10B,12C,14D,186．面对对象程序设计思想相关题解单选题1,在visualBasic中显示和编辑程序代码时，采纳(C).A工程资源管理器窗口B窗体设计器窗口C代码编辑窗口D属性窗口2,在VB中，要设置文本框的缺省文字，应运用属性:（A）A,TextB,NameC,CaptionD,Font3,在VB中，要设置窗口的标题文本，应运用属性:(B)A,FontB,CaptionC,NameD,Text4,用visualBasic编程，我们把工具箱中的工具称为(A)A,控件B,工具C,窗体D,事务5,在VB中，要设置某个对象属性时，应进入:(D)A随意模式B中断模式C运行模式D设计模式6,能够改变复选框中背景颜色的属性是(C)。A,ValueB,FontColorC,BackColorD,Font7,对于窗体，Click(单击)是它的一个(A)A重要事务B重要属性C重要方法D重要对象8,VisualBasic中，设置控件的位置，可改变下列(B)属性。A,Height及TopB,Left及TopC,Height及WidthD,Left及Width9,在VB中，设置控件的大小可改变（A）A,Height及WidthB,Height及TopC,Left及TopD,Left及Width（三）算法及问题解决1,解析法2,穷举法3,递归法综合分析1,有5人，问第5人龄，说比前面第4人小3岁，问第4.3.2人，都说比前面人小3岁，问第1人，说他的龄为38岁。问第5人的龄多大。用递归法解决此问题的正确步骤是(B)。选项:A,①定义age(n)函数②函数中当n>1时返回函数值为age(n-1)当n=1返回函数值为38B,①定义age(n)函数②函数中当n>1时返回函数值为age(n-1)-3当n=1返回函数值为38C,①定义age(n)函数②函数中不断地调用age(n-1)-3D,①定义age(n)函数②函数中不断地调用age(n)函数自己4,排序及查找数据四,应用程序设计1,程序设计的一般步骤2,简单程序设计综合分析1,a,b,c三变量存放不同的数，值a最大，b第二，比较好的算法是（）A,①定义一个max(x,y)函数（值为x,y中的大值）②a=max(max(a,b),c)B,①如a<b就a=b②如a<c就a=cl如b<c就b=cC,①如a>b就a=b②如a>c就a=cl如b>c就b=cD,①如a<b就两变量交换②如a<c就两变量交换l如b<c就两变量交换2,求2!+3!+4!+5!……+10!的值。能完成此运算，并且比较好的算法是(A)。选项:A,①定义求阶乘的函数用jc(n)②主程序中用一个循环9次调用jc(n)函数进行累加B,用一个程序完成:每一项阶乘用一个For/Next循环完成，整个程序包括9个循环C,用解析法:s=1*2+1*2*3+1*2*3*4+…+1*2*3*4*5*6*7*8*9*10D,不必定义函数，只要用一个单重循环就能完成3,要求打印100至200之间全部偶数的平方根（C）A,①i=100②DoWhilei<200:Printi,Sqr(i):loopB,①i=100②DoWhilei<200:Printi,Sqr(i):i=i+1:loopC,①Fori=100to200step2:Printi,Sqr(i):NextiD,①Fori=100to200:Printi,Sqr(i):Nexti编程题必修1_15,编写程序，使能打印下面所示的图案。程序：PrivateSubFormClick()DimiAsInteger'定义i为整型变量DimjAsInteger'定义j为整型变量Fori=-3To3PrintTab(Abs(i)+5)Forj=1To(4-Abs(i))-1Print"*";NextjPrint'换行NextiEndSub必修2_15,编写程序，使能打印下面所示的图案。程序：PrivateSubFormClick()DimiAsInteger'定义i为整型变量DimjAsInteger'定义j为整型变量Fori=-3To3PrintTab(Abs(i)+5);Forj=1To2*(3-Abs(i))-1Print"*";NextjPrint'换行NextiEndSub必修3_15,编写程序，使能打印下面所示的图案。程序：PrivateSubForm_Click()DimiAsIntegerDimjAsIntegerFori=1To6PrintTab(10);Forj=1ToiPrint“@”;NextjPrintNextiEndSub必修4_15,完善显示按钮的click程序，将代码段中“变量1“,“变量2.“变量3,处换成正确的变量名，使当单击该按钮时，Labell.Label2分别显示30,10,完成全部操作后，诸按“Ctrl+S”保存。PrivateSubCommand_Click()x=10y=30Ifx<yThent=xx=yy=tEndIfLabel1.Caption=xLabel2.Caption=yEndSub必修5_15,完善"推断"按钮的click程序，使当从Textl中输入一个数时，当该数大于或等于60时在Lebell中显示"及格"，该数小于60时在Labell中显示"不及格"。完成全部操作后，诸按“Ctrl+S”保存。PrivateSubCommand1_Click()DimaAsSinglea=Val(Text1.Text)Ifa>=60ThenLabel1.Caption=“及格”EndIfIfa<60ThenLabel1.Caption=“不及格”EndIfEndSub必修1_16,编写程序，求函数y的值(当x<=0时,y=3x+1;当x>0时，y=4x+1)。程序：PrivateSubFormClick()DimxAsSingle'定义x为单精度型变量DimyAsSingle'定义y为单精度型变量x=Val(InputBox("请输入变量x"))Ifx<=0Theny=3*x+1Elsey=4*x+1EndIfPrint"y=";yEndSub必修2_16,编写程序，求y=6x-5的值。(x的值在程序中调用InputBox函数，在弹出的标准输入对话框中输入)程序：PrivateSubForm_Click()DimxAsSingleDimyAsSinglex=Val(InputBox(“请输入变量x”))y=6*x–5Print“y=”;EndSub必修3_16,一只猴子摘了一堆桃子，它每天吃当天桃子数的一半，每次忍不住多吃了一个。这样到第十天时只有一个桃子可以吃了，编程计算猴子最初共有多少个桃子。完成全部操作后，诸按“Ctrl+S”保存。程序：PrivateSubForm_Click()DimiAsIntegerDimsAsIntegers=1Fori=1To9s=(s+1)*2NextPrint“s=”;sEndSub必修4_16,完善按钮“计算7!”的Click事务程序，当单击命令按钮时Text1显示7!的值。PrivateSubCommand1_Cli