Для решения задачи с подбрасыванием монетки в Excel можно использовать следующий алгоритм: 2
- В ячейке C2 ввести формулу:
=БИНОМ.РАСП($B2;6;C$1;0)
. 2 Она вернёт значение биноминального распределения для нуля успехов (значение в В2) при шести испытаниях и вероятности успеха в одном испытании равного 20% (С1). 2 - В ячейке C11 имитировать первый бросок монеты:
=ЕСЛИ(СЛЧИС()<=C$10;'Р';'О')
. 2 Скопировать эту формулу на диапазон С11:F16. 2 - В C18 подсчитать процент решек:
=СЧЁТЕСЛИ(C11:C16;'Р')/6
. 2 Скопировать формулу в С18:F18. 2 - Повторить серию из 6 подбрасываний монеты ещё 16 раз с помощью «Таблицы данных». 2 Для этого ввести формулы в R2: =C18, S2: =D18, T2: =E18, U2: =F18. 2 Выделить диапазон Q2:U18, пройти по меню «Данные» —> «Анализ „что, если“» —> «Таблица данных». 2 Оставить поле «Подставлять значения по столбцам в…» пустым, а в поле «Подставлять значения по строкам в…» щёлкнуть на любую пустую ячейку, например W3. 2 Это создаст в диапазоне Q3:U18 формулу массива: {=ТАБЛИЦА(;W5)}. 2
- В ячейке R20 подсчитать вероятность серий, в которых было 50% решек:
=СЧЁТЕСЛИ(R2:R18;0,5)/17
. 2 Скопировать на ячейки R20:U20. 2 - В R2:U18 создать условный формат, чтобы подсветить ячейки со значением 50%. 2
Также для моделирования подбрасывания монетки в Excel можно использовать код на VBA. 34