D1%81%D1%82%D0%B0%D1%82%D1%8C%D0%B8/212270/img6.gif' alt='Программа Для Вычисления Площади Фигуры' title='Программа Для Вычисления Площади Фигуры' />Метод Монте Карло вычисления площадей фигур и его реализация в среде Delphi. Разделы Информатика В начале урока рассказываю идею метода. Вам необходимо найти площадь плоской геометрической фигуры Данные калькуляторы помогут найти площадь треугольника, четырехугольника,. Небольшие учебные программы, которые написаны специально для этой. Вычисление площадей двумерных геометрических фигур,. Пусть у нас есть какая нибудь. Sfig. нам необходимо найти. Ограничим ее другой. Stotal мы можем. Например, прямоугольником АСDB. И пусть про любую точку прямоугольника. А теперь начнем опыт будем бросать. Программа Для Вычисления Площади Фигуры' title='Программа Для Вычисления Площади Фигуры' />Когда нам покажется, что зерна. Ntotal и сколько из них на фигуре Nfig. Ясно, что число зерен, попавших внутрь фигуры. Stotal. Промоделируем этот опыт на ЭВМ. Пусть Y cosX, а Х I. Из чего должен состоять алгоритм 1. Бросание зерна бросание случайной. X и Y которой случайны, причем Х. Y от 0 до 1. И в. X и Y должны появляться с. X и Y должны быть равномерно. Тут надо напомнить ребятам. Программа Для Вычисления Площади Фигуры' title='Программа Для Вычисления Площади Фигуры' />У каждой программы есть описание работы, информация о данной геометрической фигуре и формула площади, используемая программой. Надо определить, куда попала точка. И вести подсчет Nfig. Повторить пп. 1 и 2 столько раз, чтобы. Дети без труда напишут программу по. И. после этого наступает момент разочарования. Разработаем. интерфейс программы. Тут ребята сами предлагают. Разместим на форме следующие. Edit окно редактирования для ввода. Ntotal Button кнопка для запуска работы. Монте Карло Panel панель для вывода посчитанной. Standart Палитры компонентовImage для вывода точек, попавших в. Additional Палитры компонентов. Если необходимо, надо напомнить. Компонент Edit Свойство Text содержит текст, который. Edit. Этот текст надо. Ntotal. Для этого в Delphi. Str. To. Int Ntotal Str. To. Int Edit. 1. Text. Компонент Panel Свойство Caption содержит текст. Чтобы вывести. полученное число Sfig на панель, мы должны. S с помощью процедуры. Инструкция + По Ведению Домовой Книги подробнее. Str StrSfig 1. S, а потом вывести эту строку на панель. Panel. 1. Caption. Поэтому, при выводе значений. Для этого. желательно создать отдельную подпрограмму. Для полного размещения функции. Image необходимо определить X. Как найти Y. Коллективно обсуждается следующий. Разобьем интервал. Определяем наибольшее Y. Находим коэффициенты масштабирования Kx, Ky при. Устраняем искажения графика 5. Преобразуем расчетные координаты точки X, Y в. Xg, Yg. С учетом того, необходимости. Y, которая в координатах. Листинг программы, реализующей данные. Результат. работы программы при разном количестве. Задания для самостоятельной работы 1. Применить метод Монте Карло для. Y sin X, при Х I. Применить метод Монте Карло для. Подсказка. рассмотреть круг единичного радиуса с центром в. Его площадь и будет равна p. Применить метод Монте Карло для. Y sin X, при Х I. Применить метод Монте Карло для. Доработать проект а организавать проверку правильности ввода. Edit чтобы вводились только. На последующих уроках, на которых. Вычисление. площадей интегралов методом трапеций и методом. Image, Button, Edit, Panel для. В окно. компонента Edit пользователь будет вводить. Таким. образом, ребята смогут сравнить и наглядно. Листинг программыunit Monte interfaceuses. Windows, Messages, Sys. Utils, Variants, Classes, Graphics, Controls, Forms,Dialogs, Std. Ctrls, Ext. Ctrls, Buttons type. TForm. 1 classTFormPanel. TPanel Bit. Btn. TBit. Btn Edit. 1 TEdit Label. TLabel Image. 1 TImage procedure Bit. Btn. 1ClickSender TObject private.