预览加载中,请您耐心等待几秒...
1/5
2/5
3/5
4/5
5/5

在线预览结束,喜欢就下载吧,查找使用更方便

如果您无法下载资料,请参考说明:

1、部分资料下载需要金币,请确保您的账户上有足够的金币

2、已购买过的文档,再次下载不重复扣费

3、资料包下载后请先用软件解压,在使用对应软件打开

顺序查找学历案 【设计者】刘洪杰 【内容出处】浙教版算法与程序设计(2005年7月第1版),§2.4.2第39-40页。(1课时) 【课标要求】 在存储一定数据的数组中逐个与查找键进行比对,体验查找的过程。 【学习目标】 1.理解顺序查找的算法思想;(cs) 2.通过具体的实例,感受使用顺序查找算法解决问题的方法;(cs) 3.运用近似值的查找,进一步理解顺序查找的过程,做到举一反三;(cs) 4.逐步形成注意寻找、发现问题,进而设计算法和程序解决问题的意识和能力。(cs) 【评价任务】 完成探究1、练习1;(DO1) 完成探究1和比一比、练习2;(DO2) 完成探究2、练习3;(DO3) 4.完成探究2、练习4。(DO4) 【学习过程】 学法建议: 1.本主题的学习是在VB程序设计初步、数组学习基础上的深入。查找作为一种数据查询的方法,对于运用循环、数组的编程技巧和能力的提升有很大帮助,对于进一步学习理解算法思想、设计程序实现有重要的意义和作用。 2.本主题的学习按以下流程进行:生活实例→算法思想→程序实现→变式训练。 3.本主题的重点是顺序查找的算法思想和程序实现。 生活实例,引出查找(P01) 思考1:在“幸运我做主”找幸运数字的过程是怎样进行的? 二.查找及顺序查找概念 查找是一种查询数据的技术,其目标是能以比较少的步骤或较短的时间找到所需的对象。 顺序查找是在一个已知无(或有序)序队列中找出与给定关键字相同的数的具体位置。原理是让关键字与队列中的数从第一个开始逐个比较,直到找出与给定关键字相同的数为止。 三.顺序查找思想(P01) 从数组的第一个元素开始,依次判断各元素的值是否与查找键key的值相等,若a(i)=key,则输出i,查找结束;若找遍所有元素,无任何元素和key相等,则结果是未找到,结束。 1、顺序查找算法中几个重要的概念 输入:查找键(设在变量key中) 被查找的数据(设在数组变量a中) 输出:若找到,输出值为key的数据所在的数组元素的下标,记为i 若未找到,输出结果为0 看演示在数组中寻找指定数据key的过程 规模为n的数组变量a中进行顺序查找的流程图 输入查找键key i=1 N i<=n? Y Y a(i)=key? 输出结果:未找到 N 输出结果:i i=i+1 四.程序体验 探究1:幸运我做主(P02) 幸运瓶中有6个幸运数字,范围是(1~50),请同学们在文本框Text1内猜测一个数字,并且验证所猜数字是不是与瓶内的幸运数字吻合,并且在标签Label2中输出结果。(在“幸运我做主.frm”调试程序)。 Dima(1To6)AsInteger,nAsInteger PrivateSubCommand1_Click() DimkeyAsInteger,iAsInteger key=_______________ Fori=__To_____ If_____________Then Label2.Caption="恭喜你成为今天的幸运儿!"&"你猜中了第"&i&"个幸运数字" ExitFor EndIf Nexti If_______ThenLabel2.Caption="只差一点点好运气就会降临呢!" EndSub PrivateSubForm_Load() n=6 a(1)=41:a(2)=17:a(3)=39:a(4)=26:a(5)=20:a(6)=4 EndSub PrivateSubText1_GotFocus() Label2.Caption="" Text1.Text="" EndSub 比一比:(PO2) 用Do语句来实现顺序查找,线框内程序也可以用以下程序段来替换,补充程序并调试运行。(在“比一比.frm”中运行调试程序) key=_______________ i=1:found=false‘found为一个标志,标志是否找到了查找键 dowhile_______and________ If_________Then __________ Label2.Caption="恭喜你成为今天的幸运儿!"&"你猜中了第"&i&"个幸运数字" EndIf __________ loop Iffound=________ThenLabel2.Caption="只差一点点好运气就会降临呢!" 探究2:幸运你做主(PO3) 请每位同学在纸上写下自己的幸运数字(范围:1~50),老师说出一个数字,与我的数字最接近的同学将会成为本环节的幸运儿。(在“幸运谁做主.frm”完成程序调试) Constn=25 Dima(1Ton)AsInteger,iAsInteger,keyAsInteger dimiminAsInteger,ifitAs