《算法与程序设计》第二章备课参考.doc

算法与程序设计第二章备课参考在算法与程序设计第二章中，教材有许多地方没有讲清楚，需要在教学中予以说明。现汇集一些问题，以利备课时参考一、关于VB6.0上机操作的问题学会看程序的第一行语句，该语句决定了解决问题的事件是窗体事件还是按钮事件，也决定了源程序代码输入VB的操作方式。1、如果程序的第一行语句为 Private Sub Form_Load() ，（Private是私有声明、Form是窗体名称、Load是载入的意思、Sub指一个过程：即包含在Sub语句和End Sub语句中的一系列VB语句，从Sub语句后的第一个可执行语句开始执行，到遇到第一个End Sub语句结束。）其含义是窗口载入时要发生的事件，则源程序代码输入操作的方式为： 2、如果程序的第一行语句为 Private Sub Command1_Click() ，其含义是点击按钮启动Command1按钮单击事件，则源程序代码输入操作的方式为：（1）将控件工具箱中的按钮（下图1所示）拖到窗体设计窗口（下图2所示）；（2）双击该按钮，将程序源代码复制到打开的窗口中。二、课本P37 “实践”任务的问题。阅读下列程序，先写出运行的结果，说明程序的功能，然后上机验证：（2）Private Sub Command1_Cick() A=InputBox(A=,输入)B=InputBox(B=,输入)MAX=(A+B)/2+ABS(A-B)/2 Print MAx;MAXEnd Sub输入：2和5，11和7这个题目的问题在于当输入：2和5，学生写出的结果是5，而上机调试的结果是14。原因是由于在程序中没有说明变量A、B的属性，所以在语句MAX=(A+B)/2+ABS(A-B)/2中，(A+B)/2就是将A、B当成字符串来运算，其结果是25/2。而在ABS(A-B)/2中，字符串无减法运算，这一项则变成了数字运算。三、课本P52实践任务的问题。（1）阅读如下程序，跟踪程序的执行过程，观察变量A的值的变化，写出循环结束时变量A的值、循环次数和程序运行结果。Private Sub Command1_Click()For A=1 To 10 Print A Next AEnd SubPrivate Sub Command1_Click()For A=1 To 10 S=S+ANext A Print S=;SEnd Sub知识提升：读懂关键语句 S=S+A ，赋值号“=”左边是变量S；右边的S是常量S，每次循环的值是不同的，S的初值是多少？即当A=1时，右边的S=?而A=2时，S=?.从本质上看S=S+A就是一个对A值进行连加的累加器，在本程序中S=1+2+3+.+10。下面的第题雷同。Private Sub Command1_Click() For A=100 To 1 Step -1 S=S+A Next A Print S=;S End SubPrivate Sub Command1_Click() For A=1 To 10 A=A+1 Print A Next AEnd Sub知识提升：读懂关键语句 A=A+1 ，这是一个计数器程序，当循环过程中的A值为奇数时则输出A。如果要求A值为偶数时输出A，则程序如下： Private Sub Command1_Click()For A=1 To 10 If A2 Then A=A+1 Print A Else EndIf Next End Sub四、课本P53问题2-7的分析参考。陈婷今年17岁了，她的生日正好是3月12日植树节，今年植树节老师带同学们到公园里去植树。陈婷很高兴，一个人就栽了3棵树，过了一个很有意义的生日。她想，如果从明年开始每年过生日的时候都去植树，并且每一年都要比前一年多栽一棵树，这样下去，到多少岁时才能累计种到或超过100棵树呢？首先思考：能否用For循环来解决？为什么？然后算法分析：（1）、存在什么变量？（2）、变量间的关系？（3）、变量变化特点？（4）、循环终止条件？1、分析问题设年龄为Age，种树总数为Tree，则Tree可以用如下的式子表示：Tree=3+4+5+. （其中Age=17,18,19.）于是这个问题就可以转化为：当Tree100时，求Age的值。2、设计算法根据上述的分析，可设计出如下的算法：（1）令Age=17;（2）令Tree=3;（3）Age=Age+1;（4）Tree=Tree+Age-14（5）如果Tree100，则返回第（3）步;（6）输出Age的值;（7）结束。（参考帮助：tree=tree+age-14语句的算法优化推导：age和tree都是累加递增，具有同样的循环特点；用age来表示tree，可以列式：treeage-14；根据S=S+tree可得： S=S+age-14，节省变量S，优化程序为：treetreeage14）五、对循环的嵌套进行探究For j=1 To 3 For i=1 To 6 Print * Next i PrintNext j探究：利用上面的程序，若外层循环控制为18，内层循环还是16，上机调试，查看输出的图形效果，并分析归纳出内层循环控制什么？外层循环控制什么？ 得出结论：内层循环次数控制一行中列的个数，即列数；外层循环次数控制行数。六、课本P56“实践”任务的问题。（1）阅读下面程序，写出运行结果，并上机调试。Private Sub Command1_Ciick() Dim Se As String Print Tab(35);乘法表 For I=1 To 9 For J=1 To 9 Se=I & x & J & = & I*JPrint Tab(J-1)*9);Se;