For循环应用(公开课)ding课件.ppt

1、ForNext循环应用主讲教师：刘芳主讲教师：刘芳ForForNextNext循环应用循环应用2012-11-22P3相相传传我国我国南南北北朝朝时，京时，京城城有个有个卖鸡卖鸡的的张姓张姓老老汉汉，他他有一有一个个儿儿子非常子非常聪聪明明，尤尤其其擅擅长长算算术术，到，到十十二三二三岁岁时已是时已是远远近近闻闻名名的的“小小神童神童”了了。当。当朝宰朝宰相相听听说说后想试后想试探探个个究究竟竟，于是，于是派派仆仆人到人到张张老老汉汉的的店店里打里打听鸡听鸡的价的价钱钱，张张老老汉汉告告知知“公公鸡五鸡五文文钱钱一一只只，母母鸡鸡三文钱一三文钱一只只，小，小鸡鸡一文钱三一文钱三只只”。于是，。

2、于是，仆仆人人给他给他一一百百文文钱钱，要求公，要求公鸡鸡、母母鸡鸡、小、小鸡鸡都都要，数要，数量量不多不少不多不少正好正好一一百只百只，命他次命他次日日送送到到府府上。这可上。这可难难为为了了张张老老汉汉，他他怎怎么凑也凑么凑也凑不不够够这个数，这个数，只只好好问问儿儿子子。“小小神童神童”不不慌慌不不忙忙，掐掐指一算就指一算就给给出出了答了答案，案，第第二二天天照照数数送送到到宰宰相相府府。宰宰相见相见难难不不倒倒“小小神童神童”，又让仆又让仆人人给给张张老老汉汉一一百百文文钱钱，要求，要求再再买买一一百只百只鸡鸡，搭搭配配方法不能和上方法不能和上次次一样。结果一样。结果“小小神童神童”又

3、又很快很快给给出出了答了答案，案，宰宰相相暗暗暗暗称称奇奇，想最后，想最后再再试一试一次次，谁谁知知还还是没是没有有难难倒倒“小小神童神童”。这个这个故事故事就是我国古代数学就是我国古代数学名名著著张邱张邱建建算经算经里里的的百鸡百鸡百钱百钱问题。问题。编写程序，求出结果。编写程序，求出结果。任务任务1 1ForForNextNext循环应用循环应用2012-11-22P4 若若公鸡公鸡x x只，只，母鸡母鸡y y只，只，小鸡小鸡z z只，只，依题意可以列出以下方程组：依题意可以列出以下方程组：实现任务实现任务1 11003/35100zyxzyx（1 1）分析：）分析：1003/35100z

4、yxzyxForForNextNext循环应用循环应用2012-11-22P52 2个个方程方程3 3个个未知数未知数不定不定方程组方程组1003/35100zyxzyx1003/35100zyxzyx 所谓不定方程，是指未知数的个数所谓不定方程，是指未知数的个数多于方程个数，且未知数受到某些限制多于方程个数，且未知数受到某些限制（如要求是有理数、（如要求是有理数、整数整数或正整数等等）或正整数等等）的方程或方程组。的方程或方程组。 穷举法（试凑法）穷举法（试凑法）ForForNextNext循环应用循环应用2012-11-22P6 穷举法穷举法是将是将各种可能各种可能的组合全部的组合全部一一

5、测试一一测试，将，将符合符合条件的组合输出。条件的组合输出。ForForNextNext循环应用循环应用2012-11-22P71003/35100zyxzyx1003/35100zyxzyx将将*3得到得到 15x+9y+z=300 由由得到得到 z=100-x-y 将将代入代入得到得到15x+9y+100-x-y=300整理后得到：整理后得到：7x+4y=100 ForForNextNext循环应用循环应用2012-11-22P8 “百钱买百鸡百钱买百鸡”问题最终归结为问题最终归结为求求 7x+4y=100 的的非负整数非负整数解。解。由由得得x x的范围：的范围：x0,14x0,14且且

6、xZxZ由由得得y=(100-7x)/4For循环循环实现实现重要结论重要结论Int函数函数Int(y)=yForForNextNext循环应用循环应用2012-11-22P97x+4y=100 xy100-x-y025754187881181124847x+4y=100的所有整数解的所有整数解ForForNextNext循环应用循环应用2012-11-22P10（2 2）建立用户界面，设置对象属性。）建立用户界面，设置对象属性。ForForNextNext循环应用循环应用2012-11-22P11Private Sub Command1_Click() Dim p As String 记录组

7、合记录组合 List1.Clear For x = 0 To 14 y = (100 - 7 * x) / 4 If Int(y) = y Then p = Format(x, ) & Format(y, ) & _Format(100 - x - y, ) List1.AddItem p End If Next xEnd Sub（3 3）编写程序代码。）编写程序代码。ForForNextNext循环应用循环应用2012-11-22P12 马克思曾经做过这样一道趣味数学题：马克思曾经做过这样一道趣味数学题：有有3030个人个人在一家小饭馆里用餐，其中有在一家小饭馆里用餐，其中有男人、女人和小孩

8、。每个男人、女人和小孩。每个男人男人花了花了3 3先令，先令，每个每个女人女人花了花了2 2先令，每个先令，每个小孩小孩花了花了1 1先先令，一共花去令，一共花去5050先令先令。问男人、女人和。问男人、女人和小孩各有几人？小孩各有几人？课堂练习课堂练习ForForNextNext循环应用循环应用2012-11-22P13解题过程：解题过程：假设男人假设男人x x，女人，女人y y，小孩，小孩z z，列方程组，列方程组x+y+zx+y+z=30 =30 3x+2y+z=50 3x+2y+z=50 消元整理最后得消元整理最后得2x+y=202x+y=20并且并且y=20-2xy=20-2xx x

9、范围：范围：x0,10 x0,10y y范围：范围：y0,20y0,20ForForNextNext循环应用循环应用2012-11-22P14Private Sub Command1_Click() Print “男人男人”, “女人女人”, “小小孩孩 For x = 0 To 10 y=20-2 * x If Int(y) = y Then Print x, y, 30 - x - y End If Next x End Sub参考代码：参考代码：ForForNextNext循环应用循环应用2012-11-22P15ForForNextNext循环应用循环应用2012-11-22P16课堂

10、练习课堂练习 1212月月1313日凌晨日凌晨3 3：1313，丹姆斯顿大街上的卡尔一家发生了，丹姆斯顿大街上的卡尔一家发生了命案，卡尔先生一家人无一幸免。警局接到报案后立即派人命案，卡尔先生一家人无一幸免。警局接到报案后立即派人赶往现场，经过现场勘察、取样，确定为有人蓄意谋杀赶往现场，经过现场勘察、取样，确定为有人蓄意谋杀经过多方取证，最后嫌疑犯锁定在卡尔先生的四名同事身上，经过多方取证，最后嫌疑犯锁定在卡尔先生的四名同事身上，经审讯得来的口供，警方确定四人中有经审讯得来的口供，警方确定四人中有一名嫌疑犯在说谎一名嫌疑犯在说谎，而说谎的这个人就是杀害卡尔一家的凶手。四名嫌疑人（用而说谎的这个

11、人就是杀害卡尔一家的凶手。四名嫌疑人（用甲、乙、丙、丁表示）的口供如下，请你判断找出，甲、乙、丙、丁表示）的口供如下，请你判断找出，谁在说谁在说谎谎？警官问：警官问：“1212月月1313日下午日下午3 3：0000至至4 4：0000谁离开过办公室？谁离开过办公室？”甲说：甲说：“不是我不是我”，乙说：，乙说：“是丙是丙”，丙说：，丙说：“是丁是丁”，丁，丁说：说：“不是我不是我”。 小组讨论，说出到底谁在说谎。并说明你是怎么判断的。小组讨论，说出到底谁在说谎。并说明你是怎么判断的。ForForNextNext循环应用循环应用2012-11-22P17穷举法（试凑法），穷举法（试凑法）， 是

12、将是将各种可能各种可能的组合全的组合全部部一一测试一一测试，将，将符合符合条件的组合输出。条件的组合输出。课堂小结课堂小结2 2、利用、利用穷举法穷举法解决典型例题解决典型例题百钱买百鸡百钱买百鸡。步骤：步骤： 据题意列出不定方程组。据题意列出不定方程组。 消元，一般消掉消元，一般消掉z。 代入整理得到代入整理得到Ax+By=C。 变形得到变形得到 y=(C-Ax)/B，利用，利用Int函数函数判断是否整数。判断是否整数。 分析分析x取值范围，利用取值范围，利用For循环循环编写程序。编写程序。1 1、概念、概念3 3、下拉列表框的属性方法和事件、下拉列表框的属性方法和事件List1.Clea

13、r List1.AddITem 字符串表达式字符串表达式 ,位置位置List1.RemoveItem 位置位置P108ForForNextNext循环应用循环应用2012-11-22P18 思考：我们使用银行卡在柜员机上取钱时，思考：我们使用银行卡在柜员机上取钱时，系统要系统要限制输入密码的次数限制输入密码的次数，为什么？，为什么？ForForNextNext循环应用循环应用2012-11-22P19 1 1、所谓、所谓“水仙花数水仙花数”，是指一个，是指一个三位数三位数，其，其各位数的立方和等于该数各位数的立方和等于该数，如如153 = 13 + 53 + 33153 = 13 + 53 +

14、 33，编写程序，编写程序输出所有的输出所有的“水仙花数水仙花数”。 课后探究课后探究解题关键：三位数的个位数、十位数、百位数的表示。解题关键：三位数的个位数、十位数、百位数的表示。ForForNextNext循环应用循环应用2012-11-22P20 2 2、有一个长长的楼梯，如果一次、有一个长长的楼梯，如果一次上上两阶两阶，最后剩，最后剩一阶一阶；如果一次上；如果一次上3 3阶阶，最后剩最后剩两阶两阶；如果一次上；如果一次上5 5阶阶，最后剩，最后剩4 4阶阶；如果一次上；如果一次上6 6阶阶，最后剩，最后剩5 5阶阶；如；如果一次上果一次上7 7阶阶，刚好上完刚好上完。请编写程序，。请编写程序，计算该阶楼梯计算该阶楼梯至少至少有多少台阶？有多少台阶？ForForNextNext循环应用循环应用2012-11-22P21