Pascal程序设计之IF语句教案.doc

Pascal程序设计之IF语句教学目标：根据本节课教学内容以及学生对pascal程序设计已有了一定的认知，并学习了顺序结构的特点，结合学生现有知识水平，确定本节课教学目标如下：1、知识目标（1）掌握和理解IF语句的格式和功能；（2）会画IF语句的流程图；（3）学会用IF语句解决日常生活中的实际问题。2、能力目标（1）提高学生正确阅读源程序的能力；（2）培养学生发现问题、分析问题、解决实际问题的能力；（3）提升学生严密的逻辑思维能力和自主探究的能力；（4）经历实践、分析、归纳，掌握IF语句的格式和功能。3、情感目标（1）运用半成品加工策略，完善程序，发展学生思维的逻辑性，及严谨的学习态度；（2）培养学生积极参与活动的意识，发挥他们的主观能动性，激发他们对程序设计的兴趣。教学重点：掌握IF语句的格式和功能。教学难点：提高学生运用IF语句解决实际问题的能力。教学环境：多媒体网络教室教学过程： IF语句是高中信息技术教材（重大版）第五章第五节的内容之一，它是建立在学生已学习顺序结构的基础之上，为后续学习循环结构作了铺垫。PASCAL中IF语句对学生来说，并不难理解，特别是学生在英语中已学过IF引导的条件语句，它和PASCAL程序设计有诸多相似之处，所以我以英语中的IF条件语句作引子，导入本节课的内容，本节课的重心放在如何引导学生理解IF语句的功能以及利用IF语句解决实际问题的能力。具体教学过程如下：教学环节教师活动学生活动设计意图创设情境 引入课题同学们，请看屏幕上出示的两条英文语句,请你们朗读并翻译。If you fell happy then you wil smile。If you fell happy then you will smile else you will sad。提问：你在日常生活和学习中遇到这样的类似的问题吗？这是英文中用IF来描述根据条件的不同，会有不同的结果的例子，而在PASCAL中我们能否根据不同的条件，执行不同的语句呢？这节课我们将学习PASCAL程序设计中的IF语句。朗读并翻译学生积极思考学生可能会给出不同的答案通过学生熟悉例子，进一步提出问题，引导学生思考，唤起学生的求知欲望和激发兴趣，从而引入课题。合作探究 构建新知如何让计算机感到幸福，就微笑呢？否则，就感到悲伤呢？1、 师生对问题进行分析，理出一个普遍被大家都认可的意见：（1）程序运行时，屏幕首先出示“Do you fell happy?” 。（2）当从键盘输入“y”，则计算机输出显示“smile”，输入其他，则输出显示“sad”。2、 师生共同完成程序 ：Var a:char;beginwriteln(Do you fell happy ?);readln(a);if a=y then writeln(smile) else writeln(sad); end.3、进一步提出问题：根据刚才的观察学习，能不能总结出if语句的流程示意图(如下图)和语句格式。师生共同分析总结出if语句的一般格式：If 条件 then 语句1 else 语句2功能是：当条件成立时，则执行语句1，否则执行语句2。4、提出新的类似问题： 教师活动：若键入”Y”，则屏幕显示“J”；若键入“N”； 则屏幕显示“L”的程序该怎么编写？在此基础上，若键入其他的，则屏幕显示“wrong”的程序又该怎么编写？ 得出if语句的简化格式：If 条件 then 语句1功能是：当条件成立时，则执行语句1，条件不成立，则直接执行下一条语句。得出if语句的扩展格式：if条件 then 嵌套一个if 语句else 嵌套一个if 语句功能是：当条件成立时，则执行then后面的if语句，条件不成立，则直接执行else后面的if语句。学生接受新知识学生积极思考,并回答问题学生在原来程序基础上修改程序，通过多媒体广播系统展示有代表性学生的成果，师生共同分析和探讨。让学生多思考充分调动其学习积极性强化语句格式让学生在探究的过程中归纳结论，体现了既重过程又重结论的新课程教学要求。体现了两个转变，教师由讲授者变教学活动的组织者、引导者、合作者；学生由被动接授者变主动参与的学习的主体。强化训练巩固新知1、阅读程序，完成问题：例：下列程序段的输出结果为 ( )。VarA:Integer;BeginA:=17;If (A Mod 2=0) Then Writeln(YES)Else Writeln(NO);End.例：下列程序输出结果为（ ）。Var Score:Integer;Begin Score:=51; If (Score=60) Then Writeln(PASS) Else Writeln(NO);End.2、 程序填空：例：为迎接元旦节的到来，重百商场某品牌的衣服每件95元,若消费满300元,可打8.2折,输入购买衣服的件数,输出总共需要支付的金额。Var num:integer; total:real;begin readln(num);total:=num*95; if ( ) then total:=total*0.82;writeln(total=,total);end.例：编程求X的绝对值。Var X,Y:Integer;Begin Readln(X);If ( )Then ( )Else Y:=X;Writeln(Y);End.学生观看实例1的执行过程，并注意i、s的变化通过对程序的分析，让学生更容易理解、掌握对for循环语句的执行过程有一个初步的认识让学生通过编程解决生活的事例，以培养学生的知识和技能为主，在活动过程中掌握运用信息技术解决问题的思想和方法，让学生意识到现实生活中蕴藏着丰富的程序设计例子，从而体现“小课堂，大社会”的教育观。学以致用尝试编程1、编一程序，求如下分段函数y的值，x从键盘输入。在教室巡回及时发现学生出现问题指出现比较普遍的错误，并分析错误的原因检查学生能不能根据实际问题写出if语句的格式和正确的条件判断能力课堂小结回顾本节课的内容，巩固已学过的知识。多媒体课件给出if语句的基本格式，进一步强调如何正确使用if语句。反馈课堂所学内容帮助