rulinux.net - Все о GNU/Linux и не только - Форум - Talks - Лоровские комментаторы неспособны решить задачку правильно.

Лоровские комментаторы неспособны решить задачку правильно.

http://www.linux.org.ru/forum/talks/4981030?lastmod=1275958551886

Помогите со следующей задачей по теории вероятности: В мешке 4 синих, 4 красных, 2 белых и 2 черных шара. Вытащили (не возвращая обратно) случайные 4. С какой вероятностью среди них будут только шары двух цветов (не важно каких именно)?

А что скажет торсионный разум по этому поводу?

anonymous(*) (2010-06-08 09:53:00)

Mozilla/5.0 (Windows; U; Windows NT 6.1; en-US; rv:1.9.2.3) Gecko/20100401 Firefox/3.6.3

[Ответить на это сообщение]

Ответ на: Re: Лоровские комментаторы неспособны решить задачку правильно. от lester_ 2010-06-09 17:02:09

Скрыть

Re: Лоровские комментаторы неспособны решить задачку правильно.

>o_O, я на С++( С по сути ) вообще-то привел решение
Кульхацкер, да. Решение прикольное.

anonymous(*)(2010-06-09 17:09:19)

Mozilla/5.0 (Windows; U; Windows NT 6.1; en-US; rv:1.9.2.3) Gecko/20100401 Firefox/3.6.3

[Ответить на это сообщение]

Ответ на: Re: Лоровские комментаторы неспособны решить задачку правильно. от anonymous 2010-06-09 16:59:11

Скрыть

Re: Лоровские комментаторы неспособны решить задачку правильно.

> А чем тебе слово моделирование не нравится? То что модель простенькая?
Нам, торсионщикам, вообще пофиг как и что называть, к терминам мы не щепетильны, ибо смотрим всегда в суть вещей и прекрасно понимаем что терминологическая обёртка это всего лишь обёртка :)))

makharadg(*)(2010-06-09 17:32:22)

Mozilla/5.0 (Windows; U; Windows NT 5.1; ru; rv:1.9.2.3) Gecko/20100401 Firefox/3.6.3 GTB7.1

[Ответить на это сообщение]

Ответ на: Re: Лоровские комментаторы неспособны решить задачку правильно. от makharadg 2010-06-09 17:32:22

Скрыть

Re: Лоровские комментаторы неспособны решить задачку правильно.

Вот переборное решение на Хаскелле. Короче рандомного получилось.

haskell





import Data.List



fourOf :: [a] -> [[a]]

fourOf xs =

  [ [a,b,c,d] | (a:as)

anonymous(*)(2010-06-09 18:25:15)

Mozilla/5.0 (Windows; U; Windows NT 6.1; en-US; rv:1.9.2.3) Gecko/20100401 Firefox/3.6.3

[Ответить на это сообщение]

Ответ на: Re: Лоровские комментаторы неспособны решить задачку правильно. от anonymous 2010-06-09 18:25:15

Скрыть

Re: Лоровские комментаторы неспособны решить задачку правильно.

\begin[haskell]{highlight}

import Data.List

fourOf :: [a] -> [[a]] fourOf xs = [ [a,b,c,d] | (a:as)

anonymous(*)(2010-06-09 18:27:10)

Mozilla/5.0 (Windows; U; Windows NT 6.1; en-US; rv:1.9.2.3) Gecko/20100401 Firefox/3.6.3

[Ответить на это сообщение]

Ответ на: Re: Лоровские комментаторы неспособны решить задачку правильно. от anonymous 2010-06-09 18:27:10

Скрыть

Re: Лоровские комментаторы неспособны решить задачку правильно.

Глючит чего-то вставка кода.

*Main> length (fourOf [1,1,1,1,2,2,2,2,3,3,4,4]) 495

*Main> length(filter (== 2) (map length (map nub (fourOf [1,1,1,1,2,2,2,2,3,3,4,4])))) 125

anonymous(*)(2010-06-09 18:28:12)

Mozilla/5.0 (Windows; U; Windows NT 6.1; en-US; rv:1.9.2.3) Gecko/20100401 Firefox/3.6.3

[Ответить на это сообщение]

Ответ на: Re: Лоровские комментаторы неспособны решить задачку правильно. от anonymous 2010-06-09 18:28:12

Скрыть

Re: Лоровские комментаторы неспособны решить задачку правильно.

Ничего не глючит. Закрывающий тег надо ставить.

Tux-oid(*)(2010-06-09 18:59:49)

Mozilla/5.0 (Windows; U; Windows NT 6.1; ru; rv:1.9.2.3) Gecko/20100401 Firefox/3.6.3

[Ответить на это сообщение]

Ответ на: Re: Лоровские комментаторы неспособны решить задачку правильно. от Tux-oid 2010-06-09 18:59:49

Скрыть

Re: Лоровские комментаторы неспособны решить задачку правильно.

А я ставил - сам проверь. там стоит \end{highlight}

anonymous(*)(2010-06-09 19:03:31)

Mozilla/5.0 (Windows; U; Windows NT 6.1; en-US; rv:1.9.2.3) Gecko/20100401 Firefox/3.6.3

[Ответить на это сообщение]

Ответ на: Re: Лоровские комментаторы неспособны решить задачку правильно. от anonymous 2010-06-09 19:03:31

Скрыть

Re: Лоровские комментаторы неспособны решить задачку правильно.

Это я его поставил.

Tux-oid(*)(2010-06-09 19:08:48)

Mozilla/5.0 (Windows; U; Windows NT 6.1; ru; rv:1.9.2.3) Gecko/20100401 Firefox/3.6.3

[Ответить на это сообщение]

Ответ на: Re: Лоровские комментаторы неспособны решить задачку правильно. от Tux-oid 2010-06-09 19:08:48

Скрыть

Re: Лоровские комментаторы неспособны решить задачку правильно.

Попробуй вставить сюда этот код: http://pastebin.ca/1879798

anonymous(*)(2010-06-09 19:20:53)

Mozilla/5.0 (Windows; U; Windows NT 6.1; en-US; rv:1.9.2.3) Gecko/20100401 Firefox/3.6.3

[Ответить на это сообщение]

Ответ на: Re: Лоровские комментаторы неспособны решить задачку правильно. от Tux-oid 2010-06-09 18:59:49

Скрыть

Re: Лоровские комментаторы неспособны решить задачку правильно.

> Ничего не глючит.
глючит - левые переносы строк добавляются

lester_(*)(2010-06-09 20:04:56)

Mozilla/5.0 (X11; U; Linux i686; en-US) AppleWebKit/533.4 (KHTML, like Gecko) Chrome/5.0.375.55 Safari/533.4

[Ответить на это сообщение]

anonymous@RULINUX.NET~#	Last login: 2024-12-25 17:08:29
Регистрация Вход	Новости \| Разметка \| Пользователи \| Галерея \| Форум \| Статьи \| Неподтвержденное \| Трекер \| Правила форума \| F.A.Q. \| Ссылки \| Поиск

Этот тред читают 6 пользователей:
Анонимных: 6 Зарегистрированных: 0