第六课 掷骰子 教学设计

第六课：掷骰tóu子
学习要点：
1．进一步熟悉TextWindow和Math两个对象的常用操作。
2．了解人机交互的方法。
3．理解循环语句While…EndWhile，并能灵活地使用该语句编写循环结构的程序。
重点难点
理解循环语句While…EndWhile是本课的重点，也是难点。While… EndWhile和For…EndFor都能实现程序的循环运行，但While…EndWhile循环语句更加灵活，用For…EndFor语句能够实现的循环都能用While…EndWhile实现。21教育网
导入
例子：编写一个模拟掷骰子比大小的游戏.程序如下：
While "True"
? TextWindow.WriteLine("比赛开始，请甲按Enter投掷骰子")
? TextWindow.PauseWithoutMessage()
? a=Math.GetRandomNumber(6)
? TextWindow.WriteLine("甲投掷的骰子点数是："+a)
? TextWindow.WriteLine("请乙按Enter投掷骰子")
? TextWindow.PauseWithoutMessage()
? b=Math.GetRandomNumber(6)
? TextWindow.WriteLine("乙投掷的骰子点数是："+b)
? If a? ? TextWindow .WriteLine ("甲输了！")
? Endif?
? If b? ? TextWindow .WriteLine ("乙输了！")
? EndIf
? If a=b Then
? ? TextWindow .WriteLine ("平局！")
? EndIf
? TextWindow.Pause()
? TextWindow.Clear ()
Endwhile
（二）新授
一、人机交互程序
体现在以下几条语句：
? ? ? 1、TextWindow.WriteLine("比赛开始，请甲按Enter投掷骰子")
? ? ? 2、a=Math.GetRandomNumber(6) ? 该操作能随机地产生1-6之间的数，相当于”掷骰子“21世纪教育网版权所有
? ? ? 3、TextWindow.Pause() ?暂停程序的运行语句。
? ? ? 4、文本窗口中显示的：press any key to continue...（按任意键继续）
二、while…endwhile循环语句
循环语句：
? ? ? 1、for...endfor循环语句：该语句需要指定循环的次数
? ? ? 2、while...endwhile：用于不知道循环次数的情况。
格式：
? ? ?while<条件>
? ? ? ? ? ? ? <语句组>
? ? ?endwhile
作用：?while和endwhile共同组成循环语句。程序执行到while时，判断〈条件〉是否成立。当<条件>成立时，执行循环体<语句组>，遇到endwhile时，回头再检验<条件>是否成立……如此循环。? ? ?当<条件>不成立时，结束循环，执行endwhile后面的语句。
三、?while...endwhile语句可以控制循环的次数? while...endwhile语句的使用非常灵活，它也可以控制循环的次数。例如：计算1+2+3...+100，可以使用?while...endwhile循环语句。
sum=0
i=1
while ?i<=100
?sum=sum+i
? ?i=i+1
endwhile
graphicswindow.fontsize=30
graphicswindow.drawtext(100,80,"1+2+3+...+100="+sum)21cnjy.com
四、操作练习
1、编写程序计算：1+2+3+…，加到多少时，累加的和sum大于1000？程序如下：
sum=0
i=1
While sum<=1000
sum=sum+i
i=i+1
EndWhile
2、楠楠想把零花钱存起来买一台1800元的手机，她第一个月存100元，以后每月比前一个月多存10元，她想知道需要存多少个月才能买手机？程序如下：21·cn·jy·com
sum=0
i=0
While sum<=1800
sum=sum+i*10+100
i=i+1
EndWhile
TextWindow.WriteLine("存钱的月份数："+i)