Сторінка 1 з 7

Цікава задачка

Додано: 31 березня 2010, 16:40
pasha
Досить цікава задачка http://golovolomki.go4u.ru/go4u-11.htm , якщо хтось хоче,гляньте, вона не дуже важка.

Re: Цікава задачка

Додано: 31 березня 2010, 17:13
Jangir
а ты отгадал?)

Re: Цікава задачка

Додано: 31 березня 2010, 17:21
pasha
ага,за 15 хвилин))

Re: Цікава задачка

Додано: 31 березня 2010, 17:35
forthe
где-то я читал, что только 2% могут решить ее без подручных средств (бумага, страница браузера), т.е. в голове, имея перед глазами только условие. а с интерфейсом, который есть на сайте, она действительно решается легко.

Re: Цікава задачка

Додано: 31 березня 2010, 17:46
pasha
я її розвязував на перерві з умовою і листком паперу,а ту таблицю використав лише для перевірки

Re: Цікава задачка

Додано: 31 березня 2010, 18:14
Baro
ничего интересного) мы в школе еще решали)

Re: Цікава задачка

Додано: 31 березня 2010, 18:32
pasha
кому як

Re: Цікава задачка

Додано: 31 березня 2010, 20:12
veron
forthe писав:где-то я читал, что только 2% могут решить ее без подручных средств

интересно, где бы ты мог ее прочитать?!)))
Зображення
а загадка старая.
очень баян.
но интересная.
и без бумажки/др. подручных средств я никогда бы ее не решила

Re: Цікава задачка

Додано: 31 березня 2010, 22:07
mouse
Осень 2007, дискретная математика, visual prolog:

Код: Виділити все

next_to(X, Y, List) :- iright(X, Y, List).
next_to(X, Y, List) :- iright(Y, X, List).

iright(L, R, [L | [R | _]]).
iright(L, R, [_ | Rest]) :- iright(L, R, Rest).

einstein(Houses, Fish_Owner) :-
 =(Houses, [[house, norwegian, _, _, _, _], _, [house, _, _, _, milk, _], _, _]),
 member([house, brit, _, _, _, red], Houses),
 member([house, swede, dog, _, _, _], Houses),
 member([house, dane, _, _, tea, _], Houses),
 iright([house, _, _, _, _, green], [house, _, _, _, _, white], Houses),
 member([house, _, _, _, coffee, green], Houses),
 member([house, _, bird, pallmall, _, _], Houses),
 member([house, _, _, dunhill, _, yellow], Houses),
 next_to([house, _, _, dunhill, _, _], [house, _, horse, _, _, _], Houses),
 member([house, _, _, _, milk, _], Houses),
 next_to([house, _, _, marlboro, _, _], [house, _, cat, _, _, _], Houses),
 next_to([house, _, _, marlboro, _, _], [house, _, _, _, water, _], Houses),
 member([house, _, _, winfield, beer, _], Houses),
 member([house, german, _, rothmans, _, _], Houses),
 next_to([house, norwegian, _, _, _, _], [house, _, _, _, _, blue], Houses),
 member([house, Fish_Owner, fish, _, _, _], Houses).


Зима 2010, пьяный спор, листок\ручка :)
Зображення

Re: Цікава задачка

Додано: 31 березня 2010, 22:10
Jangir
я разгадал :-P :-P