Поиск:

Ответ в темуСоздание новой темы Создание опроса
> задача про 3 кучки и ее решение! 
:(
    Опции темы
chernika93
Дата 7.4.2014, 20:13 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 1
Регистрация: 7.4.2014

Репутация: нет
Всего: нет



Доброго времени суток. 
Передо мной поставлена задача для решения на лиспе, используя индуктивные методы.
В общем, суть.
Дано 3 кучки камешков (с разным количеством),2 игрока. За один шаг можно брать любое количество этих камешков, но только с одной кучки. Выиграет тот, кто возьмет последний.
Нужно написать функцию типа (NIM a b c) (аргументы - это количество камешков в кучках), которая бы вовзращала конс ( х.у) где х это номер кучки, а у-количество взятых камешков.
Идея решения есть, скину, если понадобится, но по коду должно быть все ясно.
В лиспе я новичок, так что извините если что)))
я написала вот такое вот:
Код

(defun nimk (a b c k)

  (cond 
     ((< (logxor a k) a) (if(= (logxor (- a k) b c)0) (cons 1 k)))
        ((< (logxor b k) b) (if(= (logxor a (- b k) c)0) (cons 2 k)))
        ((< (logxor c k) c) (if(= (logxor a b (- c k))0) (cons 3 k)))
        (t(nimk (a b c (+ k 1))))))


но выводит ошибку про *** - EVAL: undefined function A

Что не так? Подскажите. Спасибо

PM MAIL   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума LISP
Void
  • Пожалуйста, создавайте темы с содержательными названиями.
  • Lisp — это целое семейство языков. Всегда указывайте в теме используемый диалект (Common Lisp, Scheme и т.д.).
  • Уважаемые учащиеся, здесь всегда рады помочь Вам, но не делать за Вас вашу работу. У вас гораздо больше шансов получить помощь, если Вы приложите усилия и поделитесь с нами проблемами и результатами. В противном случае добро пожаловать в раздел Центр Помощи.
  • Получив ответ на интересующий Вас вопрос, не забудьте пометить его как решённый.

Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Void.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | LISP | Следующая тема »


 




[ Время генерации скрипта: 0.0586 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.