Головоломки, задачки и прочее
…Папа, Мама, Сын и Бабушка. …
Так вот она как может звучать - до меня дошел вот такой вот странный вариант ))
А что здесь из “головоломки”???
Не всем и не сразу удается избавиться от инертности мышления - не более ))
Тогда про презервативы.
Двое мужчин и две женщины, изрядно захмелев, безумно захотели друг друга. Известно, что кто-то из них болен целым букетом венерических заболеваний, но никто не хочет признаваться. У них есть 2 презерватива. Каким образом каждый из мужчин сможет совокупиться с каждой из женщин, так чтобы никто не рисковал подцепить чего не надо ?
В оригинале это звучало не так. Папа, мама, бабушка и внучка, наевшись мороженного…
(Извините, больше хулиганить не буду…))
Двое мужчин и две женщины, изрядно захмелев, безумно захотели друг друга. Известно, что кто-то из них болен целым букетом венерических заболеваний, но никто не хочет признаваться. У них есть 2 презерватива. Каким образом каждый из мужчин сможет совокупиться с каждой из женщин, так чтобы никто не рисковал подцепить чего не надо ?
Первый надевает 2 презика сразу. И далее по схеме…
А можно схему… Что-то не пойму как дальше. Или там еще надо что-то выворачивать на изнанку?
Первый надевает 2 презика сразу. И далее по схеме…
Сразу виден опытный человек ))
С презиками не выходит никак. Только такой вариант: первый надевает сразу два. Спит с первой женщиной. … Блин! Только начал, и до меня дошло. Только сейчас. Два презика - четыре поверхности, на каждого по одной. Первый мужик надевает оба презика - спит с первой женщиной. Снимает один презик и отдаёт его своему приятелю. Он чистой стороной натягивает (именно так - скрутить бубликом не получится) на себя и дотрахивает первую же. Второй тем временем приступает ко второй. Потом снимает и этот презик и отдаёт опять своему приятелю. Он напяливает поверх того и долюбливает вторую.
пизд-----ц:)
😃
вот вроде решение zagadki.pp.ru/2-zagadki-s-prezervativami
решили поэкспериментировать. Чес-слово самому, несмотря на понимание головой, было очень неожиданно получить настолько близкий к теории результат.
У вас и теория неправильная и эксперимент негодный.
Когда остаётся 2 коробки, приз может быть только в одной из них.
И тут вероятность угадать ровно одна вторая.
“А не замахнуться ли нам на Вильяма, понимаете ли, нашего Шекспира?”
В каждой из картинок зашифровано произведение Уильяма Шекспира.
#2 - Отелло
#5 - Много шума из ничего?
Или 6?
#3 - Гамлет?
Тогда #1 - Ромео и Джульетта
#5 - Много шума из ничего?
Или 6?#3 - Гамлет?
6 - Много шума из ничего
1,2,3 верно
4 - Король Лир?
4 - Король Лир?
Стесняюсь спросить - король слева или справа ))
Мимо.
Стесняюсь спросить - король слева или справа
Ну там кроме короля еще дочери были, которые повернулись к отцу гм… попой. Ну мимо так мимо.
Просто один из коллег никак не хотел принять доказательство, после чего и решили поэкспериментировать. Чес-слово самому, несмотря на понимание головой, было очень неожиданно получить настолько близкий к теории результат.
Застряли в голове эти коробки с призом. Честно говоря, я скептически относился к утверждениям, что вероятность выигрыша повышается при безусловном новом выборе игрока. И в эти эксперименты не верил, Но чтобы окончательно выкинуть из головы этого Монти-Холла 😁 решил тоже произвести эксперимент, но с выборкой побольше, эдак тысяч 10. Чтобы наверняка 😒
Провел, правда пришлось быстренько программку сваять на том что было под рукой, а было 1С 😎
Неожиданно. Вот результаты:
Игрок: 0,3778; Ведущий: 0; НовыйВыбор: 0,6222;
Игрок: 0,3754; Ведущий: 0; НовыйВыбор: 0,6246;
Игрок: 0,3855; Ведущий: 0; НовыйВыбор: 0,6145;
Игрок: 0,3809; Ведущий: 0; НовыйВыбор: 0,6191;
Игрок: 0,3754; Ведущий: 0; НовыйВыбор: 0,6246;
Ведущий вставлен просто для контроля.
Вот программа:
Процедура КнопкаВыполнитьНажатие(Кнопка)
Игрок = 0;
Ведущий = 0;
НовыйВыбор = 0;
//посчитаем удачу из выборки в 10000
Для ндх = 1 ПО 10000 Цикл
Выигрыш = ВыборКоробок(3);
Игрок = Игрок + Выигрыш[0];
Ведущий = Ведущий + Выигрыш[1];
НовыйВыбор = НовыйВыбор + Выигрыш[2];
КонецЦикла;
//Сообщить(""+ Игрок + " " + Ведущий + " " + НовыйВыбор);
Сообщить("Игрок: "+ Игрок/10000 + "; Ведущий: " + Ведущий/10000 + "; НовыйВыбор: " + НовыйВыбор/10000 + ";");
КонецПроцедуры
Функция ПсевдоСлучайноеЧисло(Макс, Мин=0)
УИ = СокрЛП(Новый УникальныйИдентификатор);
УИ = СтрЗаменить(УИ,"-","");
УИ = СтрЗаменить(УИ,"a","");
УИ = СтрЗаменить(УИ,"b","");
УИ = СтрЗаменить(УИ,"c","");
УИ = СтрЗаменить(УИ,"d","");
УИ = СтрЗаменить(УИ,"e","");
УИ = СтрЗаменить(УИ,"f","");
Дробь = Число(УИ) / Pow(10, СтрДлина(УИ));
Возврат Мин(Макс(Окр(Мин + (Макс-Мин)*Дробь), Мин), Макс);
КонецФункции
Функция ВыборКоробок(ВсегоКоробок)
//инициализация
Коробка = Новый Массив;
Для ндх=0 ПО ВсегоКоробок-1 Цикл
Коробка.Добавить(0);
КонецЦикла;
//приз в коробку!
Коробка[ПсевдоСлучайноеЧисло(ВсегоКоробок-1)] = 1;
//выбор игрока
КоробкаИгрока = ПсевдоСлучайноеЧисло(ВсегоКоробок-1);
//выбор ведущего
КоробкаВедущего = ПсевдоСлучайноеЧисло(ВсегоКоробок-1);
Пока Коробка[КоробкаВедущего] = 1 ИЛИ КоробкаИгрока = КоробкаВедущего Цикл
КоробкаВедущего = ПсевдоСлучайноеЧисло(ВсегоКоробок-1);
КонецЦикла;
//оставшаяся коробка - новый выбор
НовыйВыборИгрока = ВсегоКоробок - КоробкаИгрока - КоробкаВедущего;
//вернем выигрыши
Выигрыш = Новый Массив;
Выигрыш.Добавить(Коробка[КоробкаИгрока]);
Выигрыш.Добавить(Коробка[КоробкаВедущего]);
Выигрыш.Добавить(Коробка[НовыйВыборИгрока]);
Возврат Выигрыш;
КонецФункции
Вот программа:
Насколько “случайна” функция случайности в 1С?! Действительно ли это случайный выбор?
Нет слов.
Насколько “случайна” функция случайности в 1С?! Действительно ли это случайный выбор?
Настолько же как и в любом “человеческом” компиляторе