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

🛑 👉🏻👉🏻👉🏻 ИНФОРМАЦИЯ ДОСТУПНА ЗДЕСЬ ЖМИТЕ 👈🏻👈🏻👈🏻

Правила такие.Игрок бросает 2 кости и подсчитывает сумму S выпавших очков. Он сразу же выигрывает,если S=7 или 11,и проигрывает,если S есть 2;3 или 12. Всякая другая сумма – это его “пойнт”.Если в первый раз выпадает “пойнт”,то игрок бросает кости до тех пор,пока он или не выйграет,выбросив свой “пойнт”, или не проиграет,получив сумму очков,равную 7.Какова вероятность выигрыша?
Программа составлена на языке
TURBO PASCAL 7.0
Var
s,s1,s2,point,i,w,p,n,k,h : longint; wer : real;
writeln(‘Введите количество партий:’);
for
i:=1 to
n do begin
{моделирование “n” партий в крэкс}
randomize;{инициализация генератора случайных чисел}
1:s1:= random(7);{генерирует целые числа от 0 до 6 случайным образом}
if
s1=0 then goto
1;{на кости не может выпасть “0”}
4:s2:= random(7); if
s2 = 0 then goto
4;
if
(s=7) or
(s=11) then begin
{проверка суммы на выигрыш }
if
(s=2) or
(s=3) or
(s=12) then begin
{проверка на проигрыш}
point:=s;{если ни одно из условий выше не подошло,то “пойнту” присваеваем
repeat
{бросаем кости пока не выпадет “пойнт” или 7}
5:s1:= random(7); if
s1= 0 then
goto 5;
6:s2:= random(7); if
s2= 0 then
goto 6;
2:writeln(‘Выигрыш = ‘,w,’числу раз’);
writeln(‘Проигрыш = ‘,p,’числу раз’);
delay(10000);{Задержка – нужна,чтобы генерируемые числа не повторялись}
end
;{конец моделирования “n” партий }
wer:=(w/n);{Вероятность выигрыша равна отношению числа выигрышей к
writeln(‘Вероятность выигрыша равна = ‘,wer);
После запуска программы требуется ввести количество партий .В результате программа выдаст количество выигранных и проигранных партий , а так же посчитает вероятность выигрыша . -

Название: Вычисление вероятности игры в КРЭКСкости
Раздел: Рефераты по информатике
Тип: реферат
Добавлен 01:07:39 05 февраля 2007 Похожие работы
Просмотров: 5
Комментариев: 18
Оценило: 2 человек
Средний балл: 5
Оценка: неизвестно   Скачать

Срочная помощь учащимся в написании различных работ. Бесплатные корректировки! Круглосуточная поддержка! Узнай стоимость твоей работы на сайте 64362.ru
Если Вам нужна помощь с учебными работами, ну или будет нужна в будущем (курсовая, дипломная, отчет по практике, контрольная, РГР, решение задач, онлайн-помощь на экзамене или "любая другая" учебная работа...) - обращайтесь: https://clck.ru/P8YFs - (просто скопируйте этот адрес и вставьте в браузер) Сделаем все качественно и в самые короткие сроки + бесплатные доработки до самой сдачи/защиты! Предоставим все необходимые гарантии.
Привет студентам) если возникают трудности с любой работой (от реферата и контрольных до диплома), можете обратиться на FAST-REFERAT.RU , я там обычно заказываю, все качественно и в срок) в любом случае попробуйте, за спрос денег не берут)
Да, но только в случае крайней необходимости.

Реферат: Вычисление вероятности игры в КРЭКСкости
Реферат по теме Коллективизация: великий перелом
Реферат: Роль менеджмента в работе Комитета по делам молодежи Оренбургской области. Скачать бесплатно и без регистрации
Сочинение На Тему Недоросль Простакова
Сочинение Почему Человек Живет
Реферат по теме Анализ финансово-хозяйственной деятельности и перспективы развития АТП №9
Реферат: The Controversy Over Euthanasia Essay Research Paper
Реферат: Природа не делает скачков
Курсовая работа по теме Современные формы доходов общества и политика государства в этой области
Сочинение Диалог На Тему Мама
Реферат: Синергетика и Демократия
Реферат: Бальмонт Константин Дмитриевич
Сочинение Девочка С Персиками 6 Класс
Реферат На Тему Податковий Кредит - Офіційний Спосіб Мінімізації Податків
Дипломная Работа На Тему Интернет
Курсовая работа по теме Выявление теоретических основ развития эмоциональной сферы младших школьников с трудностями в обучении
Сочинение По Русскому Языку Четвертый Класс
Дипломная работа по теме Ответственность за хищения в форме мошенничества
Дневник Практика Экономиста Пример
Реферат: Оффшорный бизнес 2
Технико Экономическое Обоснование Реферат
Реферат: Швейное дело
Статья: Обучение решению математических задач с помощью графов
Реферат: Особливості теорії позитивної психотерапії