Практическое освоение метода моделирования на ЭВМ дискретных случайных величин и событий
Автор: max petr • Май 27, 2019 • Лабораторная работа • 799 Слов (4 Страниц) • 462 Просмотры
Цель работы.
Практическое освоение метода моделирования на ЭВМ дискретных случайных величин и событий.
Задание на работу.
Имитировать бросание игральной кости. Результаты первых 100 бросаний вывести строкой на печать.
Составить алгоритм и программу расчёта частоты события, состоящего в том, что сумма очков при двух последовательных бросаниях равна заданному К =3. Число бросаний равно 1000.
Сравнить рассчитанную частоту с теоретической вероятностью.
Ход работы
Алгоритм расчёта появления событий представлен на рисунке 1.
Теоретическая ожидаемая вероятность появления события:
[pic 1]
Листинг файла Sourse.cpp
#include
#include
#include
#include
using namespace std;
int const FullOfNumbers = 1000;
int const CurrentNumbers = 100;
int const k = 3;
float const a = 3.5;
int rez =0;
int Factorial(int a)
{
int sum = 1;
for (int i = 2; i <= a; ++i)
{
sum *= i;
}
return sum;
}
int Frequency(int mas[], int k)
{
int count = 0;
for (int i = 0; i < FullOfNumbers - 1; ++i)
{
if (mas[i] + mas[i + 1] == k)
++count;
}
return count;
}
float Puasson(float a, int k = 0)
{
float e = exp(-a);
float s = 1.0;
while (1)
{
s *= 0.01 * (rand() % 101);
if (s - e >= 0)
++k;
else
break;
}
return k;
}
int main()
{
srand(time(0));
int x[FullOfNumbers];
int sum = 0;
for (int i = 0; i < FullOfNumbers; ++i)
...