гр. Iоаннъ Бугаевъ (bougaev) wrote,
гр. Iоаннъ Бугаевъ
bougaev

Математической задачи вопрос.

Есть такой мужчина _darkus_. Он мотематег. Ну точнее он себя считает таковым, а на самом деле - философ какой то походу.
Короче у себя в уютненьком он заебашил конкурс. Типа кто первый решит задачу:

Крестьянину нужно перевезти через реку волка, козу и капусту. Но лодка такова, что в ней может поместиться только крестьянин, а с ним или один волк, или одна коза, или одна капуста. Но если оставить волка с козой, то волк съест козу, а если оставить козу с капустой, то коза съест капусту. Как перевёз свой груз крестьянин, если известно, что все переправились через реку в целости и сохранности?

.
Привожу фрагмент ответа одного из пользователей:

--State, FromState
type StateHist = (State, State)
type QueueStateHist = [StateHist]

constraint :: ShoreState -> Bool
constraint a = not(((not $ elem Peasant a) && (elem Cabbage a) && (elem Goat a))
|| ((not $ elem Peasant a) && (elem Wolf a) && (elem Goat a)))
stateConstraint s = (constraint $ fst s) && (constraint $ snd s)

Больше символов тут: http://users.livejournal.com/_darkus_/606254.html
.
Понятно, что это пиздец.
Понятно, что когда кругом такие, блядь, умные, не просто капусту не отвезёшь - постареешь нахуй уапще.
Я, канеш, в конкурсе не участвовал, потому как это всё равно, что в детском саду силушкой хвастаться. И уже опосля окончания конкурса, когда ботаники начали радоваться охуенным книжкам без картинок (приз такой), опубликовал своё решение:
"Интересно, за каким хуем пейзанину возить волка? Я б на месте колхозника угандошил бы волчка, козе на ебало надел бы мешок и перевёз бы всё за один раз."
Среди математегов наиболее оптимальная грузоперевозка прошла в 4 итерации.
Какие у вас будут варианты?
Tags: культура
Subscribe
  • Post a new comment

    Error

    default userpic

    Your IP address will be recorded 

  • 63 comments