粤教版高中信息技术选修1 2

2.3程序的选择结构

——条件语句

教学内容分析

本节为广东教育出版社出版的高中信息技术选修1《算法与程序设计》中第二章第三节第一二小节的内容。是在上两课时学习VB的基本数据类型、常量、变量、函数、表达式等程序设计语言和程序顺序结构的基础上，学习程序的选择结构—条件语句，其中包含“条件语句的格式、功能、执行过程，条件表达式，逻辑表达式的基本知识”。通过对本节的学习，学生能初步掌握VB语言中的条件语句以及关系表达式和逻辑表达式的应用，同时掌握逻辑运算的顺序，并学会使用条件语句实现选择控制结构，解决生活中的实际问题。

教学目标

知识与技能：

1、学习和掌握VB语言的条件语句的格式、功能、执行过程并针对具体问题绘制流程图

2、掌握条件表达式，逻辑表达式的基本知识；

3、掌握条件选择语句的使用方法，学会用条件语句编写简单的程序解决生活中的问题，并会调试。

过程与方法：

学生通过探究问题，在教师的引导下学习条件选择语句的执行流程及使用方法，通过练习进一步经历分析问题、设计算法、编写程序、调试程序等用计算机解决问题的过程，体验成功的快乐。

情感态度与价值观：

1、通过完善和编写程序，学生能够养成勤于思考、乐于探索的思维习惯。

2、通过完善和编写程序，学生能够具备用程序解决生活中实际问题的能力。

3、通过完善和编写程序，学生能够养成观察、实践、自主学习、思考的能力。

4、通过完善和编写程序，学生能够对VB产生兴趣，并能快乐的学习。

教学重点难点以及措施

重点：1、理解VB语言条件语句的格式、功能、执行过程。

2、掌握VB语言的关系表达式、逻辑表达式等程序设计语言的基本知识。

难点：分析与表示问题中的选择条件，在程序中灵活运用逻辑表达式。

学习者分析

通过第一章的学习，学生明白了利用计算机解决问题的基本过程，了解了程序设计有三种基本的结构，应用这三种基本结构可以以实际生活中用计算机解决大部分的问题，并初步能够使用程序的基本结构之一顺序结构来编制最简单的计算机VB程序，对程序设计已经产生一定兴趣。结合学生即将在数学必修3中学习算法初步的实际，要求学生能能够使用框图描述算法。但是由于学生对VB语言的基本

语句的使用还是比较粗浅，一部分学生出现了畏难情绪，为克服学生的畏难情绪，在选择例题时要注意由浅入深，循序渐进。

教学策略

1、先行组织者策略：利用适当的引导性材料对“选择结构程序设计”内容进行引导，让学生通过“情景”快速进入课堂。

2、演示、讲授、讨论法：知识由浅入深，螺旋式上升。

3、研究协作策略：教学过程中，以学生为主体，老师设置问题情景，学生自主探究，既可独立思考，也可协作学习。积极探索，寻求问题的答案。

媒体选择

电子白板教室、多媒体课件

知识回顾

程序三种结构，顺序选择，选择结构，循环结构。

新课导入

让我们和电脑一起玩剪刀、石头、布游戏吧，该游戏是同学们正在学习的算法与程序设计Vb语言编写的，是怎么编写的，是我们今天这节课学习的内容。引起学生兴趣，导入新课。

新课讲解

1.条件语句的格式（学生自主学习）

If 条件Then 语句组1 Else 语句组2 End If If 条件Then

语句组1

Else

语句组2

End If

2.条件语句的执行过程（学生自主学习）

（1）关系表达式

（2）关系运算符号

（3）关系表达式的值的定义

a、数值型数据比较例：13>6

b、对其他类型数据的比较例："A"> "B"

4.逻辑表达式

（1）、逻辑表达式

（2）、逻辑运算符：Not(非)、And(与)、Or(或) （3）、逻辑运算法则：

Not(T) Not(F)

T And T

T And F

F And F

5.逻辑运算的顺序

（1）、条件只有逻辑运算（Not、And、Or)

（2）、条件只有算术运算符、关系运算符、逻辑运算符（算术运算、关系运算、逻辑运算）

例：（学生合作探究）

当a=5，b=7，c=-2，d=1时，运算结果是:

a+b>c+d And a>=5 Or Not c>0 Or d<0

12>-1 And 5>=5 Or Not -2>0 Or 1<0

T And T Or Not F Or F

T And T Or T Or F

T Or T Or F

T Or F

T

课堂实例

某商场为了对苹果进行促销，规定购买2千克以上可以在原价每千克1.5元的基础上打8折。请设计一个程序计算购买x千克苹果的应付款。

1、分析问题

设购买苹果的重量是x千克，应付款为y元，根据题目给出的条件，列出下列等式。y=1.5*x (02)

2、设计算法

3、编写程序一

Dim x As Single

Dim y As Single

x = Val(InputBox("购买苹果的重量x="))

If x > 2 Then

y=1.5*0.8*x

Else

y=1.5*x

End If

Print "购买苹果的应付款y="; y; "元。"

编写程序二（技术测试题型）

Dim x As Single

Dim As Single '该行有错误x = Val(InputBox("购买苹果的重量x="))

If x > 0 Or x<=2 Then '该行有错误