随机模拟【信息技术】.docVIP

专 题 讲 座 题目：模拟问题 一、基本概念 1．随机现象 在世界上存在着两类不同的现象，决定性现象和随机现象。 如：① 在没有外力作用的条件下，原来作匀速直线运动的物体必然继续作匀速直线运动。 ② 在一个大气压下把水加热，当达到100℃时水必然沸腾，这种在一定条件下必然会发生的事情称为必然事件。反之，那种在一定条件下必然不会发生的事情称为不可能事件。 例如：黄金在常温常压呈熔融状态就是不可能事件，必然事件和不可能事件虽然形式相反，但两者的实质是相同的，在它们发生之前，我们可以准确地预测出事情的结果。这些现象我们称之为决定性现象。它广泛地存在于自然现象和社会现象之中，我们利用计算机处理的问题大部分也是这类问题。 在世界上还存在着与决定性现象有着本质区别的另一类现象。 例如：在掷一枚硬币时，它可能正面向上落下，也可能反面向上落下，预先做出准确的判断是不可能的。 这些现象有一个共同的特点，在基本条件不变的情况下，一系列 的试验或观察却会有不同的结果。换句话说，就个别情况而言，它会时而出现这种结果，时而出现那种结果，呈现出一种偶然性。这种现象称为随机现象。 随机现象有多种可能的结果，而且在事情发生之前不能准确地预测出它会有哪种结果产生。 Turbo pascal中的system单元中包含了许多标准过程，函数和预定义的量。 如：截尾函数 trunc(x)——去掉实数的小数部分 一旦实数X确定了，函数值也就随之而定了。 即使这个程序没有上机运行，我们也可以推算出该函数的函数值。 例如：Writeln(trunc(7.8))输出的值为7 这类函数叫决定性函数。 随机函数与决定性函数不同，它没有确定的函数值，就象随机现象一样，不能事先预测出结果。如果程序中出现了随机函数，那么，只有当计算机运行这个程序时，才能知道它的函数值是多少？因而，我们把它叫做随机数。 2．随机函数的特点 过程：randomize 产生内部随机数时的初始化过程。 函数：random（[w]）返回随机数，如果w缺省，返回（0,1） 之间的随机实数，w有值且不为0， 返回［0,w）之间的整型随机数 如：random(6) 随机产生0，1，2，3，4，5整数。 调random函数时，turbo pascal先从randseed常量中读取随机数发生序号，根据这个序号产生特定的随机数序列，对于以下程序 randseed:=1； for i:=1 to 5 do writeln (random:5:2)； 它给出的随机数序列为 0.03 0.86 0.20 0.27 0.67 而对于randseed:=2，0.06 0.69 0.54 0.34 0.07 当randseed未赋值时，randseed:=0 利用randseed这一性质，可对数据和文件加密。 当程序需要任意无序随机数时，可使用randomize过程来初始化，然后再调用random即可。 思考：下面两段程序的功能是什么？ （１）Program pr: Var i,a:integer; Begin Randomize; For i:=1 to 100 do Begin a:=random(6); writeln(a) end; readln; end. 答案：产生[0，5]的随机整数100个。 （２）program pr; uses crt; var i:integer; a:real; begin clrscr; randomize; for i:=1 to 10 do begin a:=random; writeln(a); end; readln; end. 答案：产生（0,1）的随机小数10个。 二、随机模拟的方法 用计算机模仿实际事物，产生一些类似真实情况的信号、数据、图象等，使人们从中获得期望的资料这种工作称作计算机模拟，又称仿真，计算机模拟是计算机的一项重要应用，几乎各种实际情况，如物理实验，交通管理，棋牌游戏，飞行员训练等，都可以用计算机进行模拟。 决定性模拟—对决定性现象进行模拟 计算机模拟 随机模拟—模拟随机现象 三、应用举例 例1：有一个园盘，盘内存36个槽。当一个小球在盘内滚动时，可能落入任一个槽内，这些槽的编号分别为1~36，其中槽号为奇数时为红色，槽号为偶数时为黄色，编一个程序模拟球滚动100次，计算落入每个槽中的次数及落入红槽、黄槽各有多少次。 分析：设定一维数组，用来存放落入每个槽中的次数。 定义形式 type类型标识符=array[下标类型] of 元素类型 数组的类型定义和变量定义可