PDF文库 - 千万精品文档,你想要的都能搜到,下载即用。

奇妙的加密与解密.pdf

Agoni°▍べ[小时光]5 页 322.809 KB下载文档
奇妙的加密与解密.pdf奇妙的加密与解密.pdf奇妙的加密与解密.pdf奇妙的加密与解密.pdf奇妙的加密与解密.pdf
当前文档共5页 2.88
下载后继续阅读

奇妙的加密与解密.pdf

奇妙的加密与解密 【教学思路】 教材分析: 本课例属广东教育出版社《信息技术基础》第四章第一节编制计算机程序解决问题。 1.本节的地位与作用 (1)用计算机程序解决问题是当今社会中信息处理的重要方法之一,学生要了解计算 机程序的工作过程,初步掌握用计算机程序解决问题的基本过程,在用计算机程序解决问题 时,算法设计是一个很关键的环节。而算法的核心是一种思维方式,算法思维习惯有利于增 强思维的条理性。 (2)本节是对用计算机程序解决问题的基本过程的入门介绍,是选修模块《算法与程 序设计》的概述和引子。因此,能否通过本节课学习来激发学生对计算机程序设计的兴趣, 将直接关系到选修模块《算法与程序设计》的顺利开设。 2.本节的主要内容 本节主要内容围绕让学生体验并理解用计算机程序解决问题的基本过程。这个过程包含 以下环节:分析问题,设计算法,编写程序,调试运行,检测结果。其中设计算法的环节最 为关键。 教材选用的加密、解密的实例比较专业,学生不太熟悉,而且加密、解密的程序代码的 编写也稍显复杂。 具体的编程不深入学习,所以课时 2 课时,本课为第一课时,重在体验 学生分析:据调查显示,对于信息技术学科,我校有 25%左右的学生是“零起点”, 还有 30%的学生虽非“零起点”,但对以前学过的知识掌握的较差。程序设计更是少有学 生接触过,再加上这部分内容相对较枯燥,很大一部分学生表现出兴趣不大。因此创设情景, 激发学生的兴趣,调动学生的主动性、积极性尤其重要。学生不可能用一节课的时间掌握多 少编程的知识,但让他们在体验中理解信息的编程加工,并通过简单的改进实现小小的目标, 达到成功的体验是完全可能的。 设计思路:教师执行加密程序,让学生了解计算机程序的工作过程,通过解剖这段程序 让学生了解程序设计的基本流程。在学生练习中,将源程序给学生,让学生运行程序亲身感 受计算机程序解决问题的过程 【教学目标】 目标维度 行为目标 知识与技能 (1)能初步认识程序代码并能对程序进行简单的修改 (2)能描述程序设计的原理、方法和过程 过程与方法 (1)能剖析程序工作的过程 (2)能在分析简单问题的基础上,初步体验简单的算法设 计 (3)能在算法分析的基础上,体验用VB编写、调试简单程 序,并检测运行结果 情感态度与价值观 能通过体验、剖析、编写、调试程序实例,感受用计算机程 序解决问题的全过程,引发学习计算机编程的兴趣 【重点难点】 教学重点:算法的含义、作用;计算机程序解决问题的过程。 教学难点:算法的含义、作用。 教学策略:针对以上教学目标和教学重难点,在教学中我准备了学生感兴趣的加密与解 密程序让他们根据课件操作体验,然后以计算机程序解决问题的各环节为主线,按分析问题、 设计算法、编写代码、调试运行、检测结果的顺序,将本节课教学安排在 2 个学时内完成。 本课是第一课时 【教学过程】 一、情境导入 刘丽的妈妈是公司经理,她总是担心通过电子邮件与客户交流业务的信函万一被别人窃 取了,将会造成不可估量的损失。 问:同学们有什么办法可以帮助刘丽的妈妈呢? 答:学生各舒已见 教师:大家的办法都很好,我们看一个动画,看看编程猫是如何帮助刘丽妈妈的。 学生观看动画 二、分析加密解密原理 我们选用 VB 来完成这一过程,接下来,我们来看一下编程环境。 【教师操作进入界面。】 设问:本界面同初中大家学会的 Word 有哪些相似之处呢? 答:都有标题栏、菜单栏、工具栏 …… 【让学生回顾初中学过的 Word 界面,这样可以进行知识的迁移,更快地接受 VB 的新 界面。VB 的界面相对较复杂,教师对 VB 独特之处进行有选择地说明:如界面设计窗口、 代码窗口、运行,停止命令行,让学生很快地能进行操作。】 教师打开加密软件进行演示 学生结合动画进行体验。 完成任务秘籍+宝典: 4.2 文件的加密步骤:链接:动画演示(宝典) 1、准备:在 D 盘建立加密的目标文件 mixin.txt,输入文字信息。 2、打开 Visual Basic 程序,在代码窗口输入加密程序。 3、调试运行程序 4、生成加密程序 三、分层教学 教师问:大家在现有的加密程序上能不能做些修改,实现解密的功能? 以下为加密程序源代码: Private Sub Form_Load() FileName$ = InputBox("请输入需要加密的文件名及路径:") Open FileName$ For Input As #1 Line Input #1, yw$ Close #1 xw$ = "" n = Len(yw$) For i = 1 To n yz$ = Mid$(yw$, i, 1) xz$ = Chr(Asc(yz$) - 10) xw$ = xw$ & xz$ Next Open FileName$ For output As #1 Print #1, xw$ Close #1 msgbox"####加密已完成!!####" end 学生开始思考如何修改程序,思考无果的同学可根据动画提示修改,模仿是为了创新, 哪怕是试图创新也是对学生发散思维的一次激发。 四、小组活动 各小组学生之间使用生成的加密解密程序相互发送加密文件并解密,检验自己完成的程 序是否能实现目的。通过此活动,让学生有一种收获感。 五、交流与表达 【教师让部分学生展示结果,并进行点评。】 各小组对活动进行小组互评。通过互评、点评让学生开阔视野,学会正确评价他人。 六、教师总结 教师进行总结,为第 2 课时做好铺垫。

相关文章