《计算机程序解决问题(教育精品).ppt》由会员分享，可在线阅读，更多相关《计算机程序解决问题(教育精品).ppt（11页珍藏版）》请在taowenge.com淘文阁网|工程机械CAD图纸|机械工程制图|CAD装配图下载|SolidWorks_CaTia_CAD_UG_PROE_设计图分享下载上搜索。
1、攸县第一中学攸县第一中学 信息技术组信息技术组体验程序的作用及其编制环境体验程序的作用及其编制环境 编制计算机程序来解决问题编制计算机程序来解决问题 菲菲有用电脑写日记的习惯，某天晚上她突然发现妈妈正在她电脑里看她写的日志其实菲菲不愿意把日记给妈妈看。我们一起帮菲菲想想办法，解决她的苦恼。菲菲的苦恼菲菲的苦恼加密典例分析典例分析-学生活动学生活动说出你的心里话1、请同学们打开D:VB文件夹（目录）下：“pf.txt”记事本文件，写上一句想对同桌说的心里话。2、利用加密程序（D:VB加密.exe)给pf.txt文件加密。3、完成后同桌互换座位，打开文件，看看同桌对你说的心里话。注意事项：路径是由
2、盘符和文件夹组成，中间用“”隔开。示例：D:VBpf.txt只对你说的心里话加密一次。请你阅读教材P76-P77并完成学案，你就可以解密你同桌说的心里话了。质疑释疑 合作探究-解密程序检测效果检测效果-加密原理加密原理加密前的文件(明文）加密后的文件(密文）加密程序我函数转换机内码减去10新机内码函数转换稳加密的过程问：程序是如何对文件进行加密的？剖剖剖剖剖剖析析析析析析加加加加加加密密密密密密程程程程程程序序序序序序这段代码的作用就是把明文中每个字符的机内码进行某些运算得到新的机内码，再转换成相应的新字符这是核心程序的关键语句，它的作用就是将符号的机内码减10，变成一个新的编码，再将编码转换
3、成相对应的新字符，形成密文，达到了加密的效果。Private Sub Form_Load()FileName$=InputBox(请输入请输入D盘中需要加密的文件名盘中需要加密的文件名:)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#加密成功加密成功#EndEnd S
4、ub程序体验程序体验-我来解密我来解密体验步骤：、打开程序开发软件、新建一个文件、双击窗体、将D:VB目录下的“加密源程序.txt”中的程序代码复制到中。、修改程序（认真动脑喽，同桌对你的悄悄话就会出现在你的眼前）。、生成文件，解密文件。、确认成功解密，提交作业。迁移训练迁移训练 拓展升华拓展升华、你、你认为加密还可以有其他方法吗？课堂小结课堂小结 今天大家在自己的努力下，通过编制程序实现了某一今天大家在自己的努力下，通过编制程序实现了某一今天大家在自己的努力下，通过编制程序实现了某一今天大家在自己的努力下，通过编制程序实现了某一个功能，解决了我们生活中的问题，你会发现，我们生个功能，解决了我们生活中的问题，你会发现，我们生个功能，解决了我们生活中的问题，你会发现，我们生个功能，解决了我们生活中的问题，你会发现，我们生活中有很多美好源于技术手段的进步和我们自身知识的活中有很多美好源于技术手段的进步和我们自身知识的活中有很多美好源于技术手段的进步和我们自身知识的活中有很多美好源于技术手段的进步和我们自身知识的进一步的提高。进一步的提高。进一步的提高。进一步的提高。同学们如对计算机编程感兴趣，可以在下学期选修课中选择算法与程序设计，体验计算机程序的奥秘。