6、（新世纪出版社-南方出版传媒）掷骰子（教案）

掷骰子（教案）
教学目标：
通过本节课的学习，学生能够掌握Small Basic的TextWindow.Pause()方法，熟练掌握While...EndWhile循环语句的基本用法，并能够绘制while...EndWhile运行流程图。学生能够通过编写掷骰子的程序应用所学知识。
重点：
Small Basic的TextWindow.Pause()方法，While...EndWhile循环语句。
难点：
理解while...EndWhile运行流程图。
教学过程：
导入新知
介绍并讲解Small Basic的TextWindow.Pause()方法和While...EndWhile循环语句的基本概念和用法，结合示例讲解。
示例代码
展示一个使用Small Basic编写的掷骰子程序的代码示例：
TextWindow.WriteLine("掷骰比赛开始！")
player1Total = 0
player2Total = 0
While (player1Total < 50) And (player2Total < 50)
TextWindow.WriteLine("玩家1按任意键掷骰子")
TextWindow.Pause()
player1Roll = Math.GetRandomNumber(6) + 1
player1Total = player1Total + player1Roll
TextWindow.WriteLine("玩家1掷出了 " + player1Roll + "，总分为 " + player1Total)
TextWindow.WriteLine("玩家2按任意键掷骰子")
TextWindow.Pause()
player2Roll = Math.GetRandomNumber(6) + 1
player2Total = player2Total + player2Roll
TextWindow.WriteLine("玩家2掷出了 " + player2Roll + "，总分为 " + player2Total)
EndWhile
TextWindow.WriteLine("比赛结束！")
If player1Total >= 50 Then
TextWindow.WriteLine("玩家1获胜!")
Else
TextWindow.WriteLine("玩家2获胜!")
EndIf
解释：这段代码模拟了两个玩家掷骰子的比赛，使用了While...EndWhile循环语句来控制比赛进行，直到有玩家的总分超过了50分才结束。
课堂练习
题目1：使用Small Basic编写一个程序，要求用户输入一个数字n，然后输出1到n的所有偶数。
题目2：使用Small Basic编写一个程序，要求用户输入一个数字n，然后输出1到n的所有数字之和。
题目3：使用Small Basic编写一个程序，模拟一个简单的猜数游戏，随机生成一个1-100的数，让玩家猜，直到猜中为止。
总结
总结本节课的重点内容，强调关键知识点，提醒学生需要重点掌握的地方。
反思
引导学生反思本节课的学习情况，检查自己的学习成果，思考哪些地方还需要加强和提高。
通过本节课的学习，学生将能够掌握Small Basic的TextWindow.Pause()方法和While...EndWhile循环语句的使用，并能够绘制while...EndWhile运行流程图。同时，通过课堂练习，学生将能够应用所学知识解决实际问题，提高自己的编程能力。