-
reteiktor (09.12.08 20:34) [0]предлагается написать программу, расставляющую на поле 8 ферзей так, чтоб они друг-друга не атаковали. программа должна работать методом "проб-ошибок".
спасибо. -
Юрий Зотов © (09.12.08 21:05) [1]Кому предлагается?
-
Кому спасибо, тому и предлагается.
-
Цена не озвучена
-
Хитрий Лис (09.12.08 21:16) [4]Не стесняйтесь :) Огласите бюджет.
-
TUser © (09.12.08 21:29) [5]ну написал
пожалуйста -
Пробегал2.... (09.12.08 21:47) [6]как умнО студент хочет свалить решение задачи со своих плеч.
Почти зачОт. -
antonn © (09.12.08 22:36) [7]если кто то действительно захочет помочь автору:
http://forum.sources.ru/index.php?showtopic=259116 -
oxffff © (09.12.08 22:43) [9]
-
KilkennyCat © (10.12.08 00:23) [10]
-
Jeer © (10.12.08 01:13) [11]Ой, сколько помошников :)
-
А... ссылочку куда идти, если НЕ хочу помочь?
-
antonn © (10.12.08 01:28) [13]
> korneley ©
вероятно нужна ссылка в [10], заботливо и по-дружески предоставленной одним из обитателей форума... -
> antonn © (10.12.08 01:28) [13]
> > korneley ©
давлю левую мышь, дрожащми пальцАми...:) -
Германн © (10.12.08 01:38) [15]
> korneley © (10.12.08 01:33) [14]
>
>
> > antonn © (10.12.08 01:28) [13]
> > > korneley ©
>
> давлю левую мышь, дрожащми пальцАми...:)
>
Не надо её давить. Ей 40 лет. Пожалей несчастную. Её уже 40 лет давят! -
Илья Корстин © (10.12.08 01:48) [16]Огого! Первый пост шикарен!
-
> Германн © (10.12.08 01:38) [15]
Эта - выдержит. И клавиатура, кстати :)) -
Mystic © (10.12.08 12:17) [18]solution(YList) :-
sol(YList,
[1, 2, 3, 4, 5, 6, 7, 8],
[1, 2, 3, 4, 5, 6, 7, 8],
[2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16]).
sol([], [], Dy, Du, Dv).
sol([Y|YList], [X|Dx1], Dy, Du, Dv) :-
del(Y, Dy, Dy1),
U is X-Y,
del(U, Du, Du1),
V is X+Y,
del(V, Dv, Dv1),
sol(YList, Dx1, Dy1, Du1, Dv1).
del(Item, [Item|List], List).
del(Item, [First|List], [First|List1]) :-
del(ITem, List, List1).
?- solution(S). -
> предлагается написать программу, расставляющую на поле 8
> ферзей так, чтоб они друг-друга не атаковали. программа
> должна работать методом "проб-ошибок".
>
> спасибо.
Класс!
Наглость - вторая совесть.
З.Ы. А ведь чувак таки получит своё. Сейчас найдётся несколько "добрых" людей, которые напишут это дело за него (поделятся кодом). Не здесь - так на другом форуме. А потом в резюме он напишет "Аз есьмь программизд!" :(