![]() |
|
Модераторы: Poseidon |
![]()
|
|
| Fant87 |
|
|||
|
Новичок Профиль Группа: Участник Сообщений: 21 Регистрация: 9.2.2010 Репутация: нет Всего: нет |
Здравствуйте, помогите пожалуйста переделать программу. Задание: Вывести T если сумма списка четная, а если не четная, то вывести NILL.
Я написал программу, но с использованием команды EVENP, а как оказалось её нельзя использовать. Вот код программы: (defun sum(list) (cond ((null list) 0) (t (+ (car list) (sum (cdr list))))) ) (defun f1(list) (evenp (sum list)) ) Помогите как-то заменить EVENP, преподаватель сказал, что надо через деление и потом смотреть остаток от деления, но как это сделть в Lispe я не пойму и не могу найти нужных функций. Думал, найду код самого EVENP, но все попытки были не удачными. |
|||
|
||||
![]()
|
| Правила форума "Центр помощи" | |
|
|
ВНИМАНИЕ! Прежде чем создавать темы, или писать сообщения в данный раздел, ознакомьтесь, пожалуйста, с Правилами форума и конкретно этого раздела.
Более подробно с правилами данного раздела Вы можете ознакомится в этой теме. Если Вам помогли и атмосфера форума Вам понравилась, то заходите к нам чаще! С уважением, Poseidon, Rodman |
| 0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей) | |
| 0 Пользователей: | |
| « Предыдущая тема | Центр помощи | Следующая тема » |
|
|
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности Powered by Invision Power Board(R) 1.3 © 2003 IPS, Inc. |