Курсовая: Вычисление вероятности игры в КРЭКС - текст курсовой. Скачать бесплатно.
Банк рефератов, курсовых и дипломных работ. Много и бесплатно. # | Правила оформления работ | Добавить в избранное
 
 
   
Меню Меню Меню Меню Меню
   
Napishem.com Napishem.com Napishem.com

Курсовая

Вычисление вероятности игры в КРЭКС

Банк рефератов / Программирование

Рубрики  Рубрики реферат банка

закрыть
Категория: Курсовая работа
Язык курсовой: Русский
Дата добавления:   
 
Скачать
Microsoft Word, 76 kb, скачать бесплатно
Заказать
Узнать стоимость написания уникальной курсовой работы

Узнайте стоимость написания уникальной работы

Игра в “крэкс” ( 2 кости ). Правила так ие.Игрок бросает 2 кости и подсч итывает сумму S выпавших очков . Он сразу же выигрывает,если S =7 или 11,и проигрывает,если S есть 2;3 или 12. Всякая другая сумма – это его “пойнт”.Если в первый раз выпадает “пойнт”,то игрок бросает кости д о тех пор,пока он или не выйграет,выбросив свой “п ойнт” , или не проиграет,получи в сумму очков,равную 7.Какова вероятность выигр ыша ? Программа с оставлена на языке TURBO PASCAL 7.0 Program kreks ; Uses crt ; Label 1,2,3,4,5,6; оп исание меток Var s,s1,s2,point,i,w,p,n,k,h : longint; wer : real; BEGIN writeln ( ‘ Введите количество партий : ’ ); readln(n); for i:=1 to n do begin моделирование “ n” па ртий в крэкс randomize ; инициализация генерато ра случайных чисел 1: s 1:= random (7); генери рует целые числа от 0 до 6 случайным образом if s 1=0 then goto 1; на кости не может выпасть “0” 4:s2:= random(7); if s2 = 0 then goto 4; s:=s1 + s2; if (s=7) or (s=11) then begin проверка суммы на выигрыш w:=w + 1; goto 2; end ; if (s=2) or (s=3) or (s=12) then begin проверка на проигрыш p := p + 1; goto 2; end ; point := s ; если ни одно из условий выше не подошло,то “пойнту” присваеваем значение s repeat бросаем ко сти пока не выпадет “ пойнт ” или 7 5:s1:= random(7); if s1= 0 then goto 5; 6:s2:= random(7); if s2= 0 then goto 6; s:=s1 + s2; until (s= point) or (s=7); if s= 7 then p:=p + 1; if s= point then w:=w + 1; 2:writeln( ‘ Выигрыш = ‘ ,w, ’ числу раз ’ ); writeln( ‘ Проигрыш = ‘ ,p, ’ числу раз ’ ); delay (10000); Задержка – нужна,чтобы генерируемые числ а не повторялись end ; конец моделирования “ n ” партий wer :=( w / n ); Вероятность выигрыша равн а отношению числа выигрышей к общему количеству партий в крэкс writeln ( ‘ Вероятность выиг рыша равна = ‘ , wer ); readln ; END . По сле запуска програ ммы требуется ввести количество партий .В результате программа выдаст количество выигранны х и проигранных партий , а так же посчи тает вероятность выигрыша . Количество партий (n) Количество выигрышей ( В ) Количество пригрышей (П ) Вероятност ь выигрыша P( В ) 10 4 6 0.4 100 45 55 0.45 1000 492 508 0.492 10000 4926 5074 0.4926
1Архитектура и строительство
2Астрономия, авиация, космонавтика
 
3Безопасность жизнедеятельности
4Биология
 
5Военная кафедра, гражданская оборона
 
6География, экономическая география
7Геология и геодезия
8Государственное регулирование и налоги
 
9Естествознание
 
10Журналистика
 
11Законодательство и право
12Адвокатура
13Административное право
14Арбитражное процессуальное право
15Банковское право
16Государство и право
17Гражданское право и процесс
18Жилищное право
19Законодательство зарубежных стран
20Земельное право
21Конституционное право
22Конституционное право зарубежных стран
23Международное право
24Муниципальное право
25Налоговое право
26Римское право
27Семейное право
28Таможенное право
29Трудовое право
30Уголовное право и процесс
31Финансовое право
32Хозяйственное право
33Экологическое право
34Юриспруденция
 
35Иностранные языки
36Информатика, информационные технологии
37Базы данных
38Компьютерные сети
39Программирование
40Искусство и культура
41Краеведение
42Культурология
43Музыка
44История
45Биографии
46Историческая личность
47Литература
 
48Маркетинг и реклама
49Математика
50Медицина и здоровье
51Менеджмент
52Антикризисное управление
53Делопроизводство и документооборот
54Логистика
 
55Педагогика
56Политология
57Правоохранительные органы
58Криминалистика и криминология
59Прочее
60Психология
61Юридическая психология
 
62Радиоэлектроника
63Религия
 
64Сельское хозяйство и землепользование
65Социология
66Страхование
 
67Технологии
68Материаловедение
69Машиностроение
70Металлургия
71Транспорт
72Туризм
 
73Физика
74Физкультура и спорт
75Философия
 
76Химия
 
77Экология, охрана природы
78Экономика и финансы
79Анализ хозяйственной деятельности
80Банковское дело и кредитование
81Биржевое дело
82Бухгалтерский учет и аудит
83История экономических учений
84Международные отношения
85Предпринимательство, бизнес, микроэкономика
86Финансы
87Ценные бумаги и фондовый рынок
88Экономика предприятия
89Экономико-математическое моделирование
90Экономическая теория

 Анекдоты - это почти как рефераты, только короткие и смешные Следующий
- Как ты провел лето?
- Элементарно - залез в Интернет и не вылезал. Оно меня так и не нашло.
Anekdot.ru

Узнайте стоимость курсовой, диплома, реферата на заказ.

Обратите внимание, курсовая по программированию "Вычисление вероятности игры в КРЭКС", также как и все другие рефераты, курсовые, дипломные и другие работы вы можете скачать бесплатно.

Смотрите также:


Банк рефератов - РефератБанк.ру
© РефератБанк, 2002 - 2016
Рейтинг@Mail.ru