当前位置:首页 >> 其它课程 >>

高一信息技术第三章第二节导学案


信息技术
课型: 新授

信息的编程加工

导学案
备课时间:

主备人:

学习目标:

1、知识目标:了解并尝试编程的主要过程。 2、能力目标:体验程序设计的独特魅力,了解编程加工的内在机制, 培养学生的创新能力。 1、重点是让学生体验通过编程实现计算机加工信息的整个过程,知 道利用计算机解决问题的步骤和基本思想方法. 2、难点是让学生理解用算法描述实际问题,理解人的思维在计算机 工作中发挥的作用。 讲授法,演示法,实践法

学习重点、难点:

讲授方法: :

问题设计:

运动会成绩如何能自动进行排名?

知 识 体 系 梳 理:

利用描点法绘制函数图像 引入: 数学中绘制函数图像的方法? 描点法 如何利用计算机来辅助进行函数图像绘制? 原理:描点 讲授: 程序设计的一般步骤: 1、需求分析(算法分析) :确定要解决的问题,即要计算机“做 什么” 2、设计算法:对特定的问题设计一组求解步骤或方法。 3、编写程序:把人工设计的算法转换成计算机能识别的代码 4、上机调试与维护:刚写好的程序不一定正确,必须在计算机上实 际运行,排除错误,测试能否达到预期的结果 认识 VB 程序设计语言: P47 资料讲解。 了解 VB 中算术运算符,赋值语句、RGB 函数,描点绘制方法

教 学 过 程 实施过程

教 学 过 程

实施过程

演示、分析程序: Private Sub Command1_Click() ‘确定按钮单击事件 Dim x, y As Single ‘定义 x,y 两个变量 Picture1.Scale (-10, 25)-(10, -25) ‘定义坐标系 Picture1.Line (-10, 0)-(10, 0), RGB(0, 0, 255) Picture1.Line (0, 25)-(0, -25), RGB(0, 0, 255) For x = -10 To 10 Step 0.0001 ‘x 值从-10 变化到 10,每次增量为 0.0001 y = x ^ 2 ‘根据表达式 y=x2 来计算 y 值 Picture1.PSet (x, y), RGB(255, 0, 0) ‘根据 x,y 的值用红色 描点 Next x ‘取下一个增量后的 x 值 End Sub ‘结束程序 学生可将程序代码拷入编程环境,借助注释文字了解代码的作用,调 试运行程序,检查程序运行的结果,体验编程解决问题的乐趣和成就 感。 实践: 1、体验函数图像绘制,绘制 y = -x ^ 2 的图像 略 2、计算任意三角形的面积:海伦公式 演示、分析程序: Private Sub Command1_Click() Dim a As Single 定义三角形一条边 a 为单精度数值 Dim b As Single 定义三角形一条边 b 为单精度数值 Dim c As Single 定义三角形一条边 c 为单精度数值 Dim p As Single 定义一个变量 p 为单精度数值 Dim s As Single 定义一个变量 s 为单精度数值 a = Text1.Text 将控件 text1 中的数值赋给 a b = Text2.Text 将控件 text2 中的数值赋给 b c = Text3.Text 将控件 text3 中的数值赋给 c p = (a + b + c) / 2 If a > p Or b > p Or c > p Then 条件语句 MsgBox “不能构成三角形“ 弹出警告框 Else s=Sqr(p*(p-a)*(p-b)*(p-c)) 三角形面积的值赋给变量 s Text4.Text = s 将变量 s 的值在控件 text4 中显示 End If End Sub Private Sub Command2_Click() Text1.Text = ““ 控件 text1 显示内容清空 Text2.Text = "“ 控件 text2 显示内容清空 Text3.Text = "“ 控件 text3 显 示内容清空 Text4.Text = "“ 控件 text4 显

实施过程

Text3.Text = "“ 控件 text3 显示内容清空 Text4.Text = "“ 控件 text4 显示内容清空 End Sub 3、水仙花数问题 水仙花数是指:一个三位数它的各位数字的立方和就是这个数本身 。 数学方程式:a3+b3+c3=a*100+b*10+c 分析:1、首先确定水仙花数的范围:是一个三位 数,也就是从 100 到 999;判断表达式是否成立,如果成立就是水仙花数;如果不成立 就不是水仙花数。2、思考等式中 a,b,c 的值是从哪里来的?对于一 个三位数,计算机是不知道怎么分离出各位上的数字的,所以还得向 计算机说明如何分离。请思考如何分离出一个三位数的各位上的数? Private Sub Command1_Click() Dim i As Integer ′ 定义自然数变量 Dim a As Integer ′ 定义百位上的数的变量 Dim b As Integer ′ 定义十位上的数的变量 Dim c As Integer ′ 定义十位上的数的变量 Label1.Caption = “” ′ 初始化文本框为空白 For i = 100 To 999 a = Int(i / 100) b = Int(i / 10) - a * 10 c = i Mod 10 ′分离百位、十位和个位数分别放入 a、b、c If a * a * a + b * b * b + c * c * c = i Then Print i ′ 如果表达式成立,就输出该自然数 End If ′ 如果表达式不成立,则不输出 Next i ′ 变量 i 增加 1 End Sub 1、回顾整个程序设计的实战过程 计算机是按程序所规定的内容和步骤进行工作的,懂得程序设计的原 理和方法将可以更好地利用计算机 2、引导学生借助“教材实践”进一步探索。 设计一个绘制 y=cos(x)+3*x^5+2*x^2+3 函数的程序

归纳小结:

达标检测:

课后反思:

拓展延伸:

如何设计一个对校运会 100 米决赛项目成绩进行输入和排序的程序?


相关文章:
信息技术导学案 2011版(湘教版八年级下册)
信息技术导学案 2011版(湘教版八年级下册)_其它课程_初中教育_教育专区。信息...关闭计算机 2 信息技术 教案 湘教版 八年级 下册 第二章 填写表格数据第 3 ...
七年级信息技术导学案12
七年级信息技术导学案12_其它课程_初中教育_教育专区。黄岛区弘文学校 课时 授课 计划 (七) 序号:12 课题 周次 :第十二周 时间:11.22 认识 Word 2003 备课...
九年级(下)信息技术导学案-30
九年级(下)信息技术导学案-30 - 盐池县第三中学 学习时间 第 1-2_周 九 年级(下) 星期 __ 第 信息技术 节 学科导学案 2013 年月 编号 日 30 学习...
更多相关标签: