欢迎来到天天文库
浏览记录
ID:48047005
大小:717.50 KB
页数:9页
时间:2020-01-13
《【信息技术(选修)】VB循环结构之For...Next语句.ppt》由会员上传分享,免费在线阅读,更多相关内容在教育资源-天天文库。
1、VisualBasic循环结构For…Next语句ByHBYZ.CS一个传说国王要奖赏国际象棋的发明者,问他有什么要求,发明者说,请在棋盘的第1个格子里放上1颗麦粒,在第2个格子里放上2颗麦粒,在第3个格子里放上4颗麦粒,在第4个格子里放上8颗麦粒,依此类推,每个格子里放的麦粒数都是前一个格子里放的麦粒的2倍,直到第64个格子,请给我足够的粮食来实现上述要求。ByHBYZ.CS来个简单点的求出第N个格子内的麦子的数量。(02、输入N,输出2N-1即可!开始结束计算2^(N-1)输入N输出结果PrivateSubCommand1_Click()DimnAsIntegerDimnumAsDoublen=Val(Text1.Text)num=2^(n-1)Text2.Text=numEndSubByHBYZ.CS复杂一点点求出前10个格子内的麦子的数量。解决方案1:等比数列前10项之和。开始结束输出SumSum=0Sum=2^10-1PrivateSubCommand1_Click()DimsumAsDoublesum=2^10-1Text2.Text=sumEndSubByHBYZ.CS复杂一点点·新知识求出前10个3、格子内的麦子的数量。解决方案2:定义Sum累加变量,用于存储结果。N=1时,N≤10条件成立:Sum=20;N=2时,N≤10条件成立:Sum=Sum+21,即Sum=20+21;N=3时,N≤10条件成立:Sum=Sum+22,即Sum=3+22;……N=10时,N≤10条件成立:Sum=Sum+210;N=11时,N≤10条件不成立,Sum不再累加。开始结束Sum=Sum+2N-1输出结果N≤10N=N+1Sum=0ByHBYZ.CS来点新鲜的求出前10个格子内的麦子的数量。开始结束Sum=Sum+2N-1输出结果N≤10N=N+1Sum=0ByHBYZ.CSFor循环结构For…Nex4、t循环说明:For计数器变量=初始值To结束值Step步长循环内容Next计数器变量当循环的步长等于1时,Step1可以省略,其他的情况不能省略。举例:求1到100之间所有偶数的和。sum=0Forn=2To100Step2sum=sum+nNextnByHBYZ.CS动手练一下求出前N个格子内的麦子的数量。(0
2、输入N,输出2N-1即可!开始结束计算2^(N-1)输入N输出结果PrivateSubCommand1_Click()DimnAsIntegerDimnumAsDoublen=Val(Text1.Text)num=2^(n-1)Text2.Text=numEndSubByHBYZ.CS复杂一点点求出前10个格子内的麦子的数量。解决方案1:等比数列前10项之和。开始结束输出SumSum=0Sum=2^10-1PrivateSubCommand1_Click()DimsumAsDoublesum=2^10-1Text2.Text=sumEndSubByHBYZ.CS复杂一点点·新知识求出前10个
3、格子内的麦子的数量。解决方案2:定义Sum累加变量,用于存储结果。N=1时,N≤10条件成立:Sum=20;N=2时,N≤10条件成立:Sum=Sum+21,即Sum=20+21;N=3时,N≤10条件成立:Sum=Sum+22,即Sum=3+22;……N=10时,N≤10条件成立:Sum=Sum+210;N=11时,N≤10条件不成立,Sum不再累加。开始结束Sum=Sum+2N-1输出结果N≤10N=N+1Sum=0ByHBYZ.CS来点新鲜的求出前10个格子内的麦子的数量。开始结束Sum=Sum+2N-1输出结果N≤10N=N+1Sum=0ByHBYZ.CSFor循环结构For…Nex
4、t循环说明:For计数器变量=初始值To结束值Step步长循环内容Next计数器变量当循环的步长等于1时,Step1可以省略,其他的情况不能省略。举例:求1到100之间所有偶数的和。sum=0Forn=2To100Step2sum=sum+nNextnByHBYZ.CS动手练一下求出前N个格子内的麦子的数量。(0
此文档下载收益归作者所有