§ 8. Вычисление значения числа π методом Монте-Карло
8.4. Создание документальной расчетной модели (этап 3б)
|
В программе на языке Pascal следует организовать цикл for с числом повторений n и в нем генерировать случайные координаты x и y точек на базовом квадрате (пример 8.3). Для подсчета числа точек, попавших на единичный круг, в цикле следует использовать оператор if с условием попадания точки в круг (x – 1)2 + (y – 1)2 ≤ 1 и при выполнении этого условия оператором k:=k+1 организовать накопление значений переменной k, как счетчика. После цикла необходимо организовать вывод результата на экран (пример 8.4). |
Пример 8.3. Для генерации координат точек воспользуемся функцией random(). Функция генерирует случайные действительные числа от 0 до 1, а координаты точек-песчинок на базовом квадрате должны принимать значения от 0 до 2. Тогда координаты точек нужно вычислять, используя выражение 2*random(). Пример 8.4. Для сравнения выведем на экран рассчитанное значение числа и фактическое значение, которое хранится в системе PascalABC.NET как значение переменной с именем pi.
|