Компьютерный форум
Правила
Вернуться   Компьютерный форум > Форум программистов > Офтопик > Работа > Задания за деньги
Перезагрузить страницу Задача с функционалом
Ответ
 
Опции темы Опции просмотра
  (#1 (permalink)) Старый
sgaluza sgaluza вне форума
Новичок
 
Сообщений: 1
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Регистрация: 30.07.2015
По умолчанию Задача с функционалом - 30.07.2015, 14:21

Напишите функцию (count p x), которая подсчитывает, сколько атомов в списке x удовлетворяет предикату p (p -функция или функциональное имя). Список x не предполагается одноуровневым.

помогите
Ответить с цитированием
  (#2 (permalink)) Старый
Alexiski Alexiski вне форума
Любитель давать советы
 
Сообщений: 4,266
Сказал(а) спасибо: 27
Поблагодарили 54 раз(а) в 54 сообщениях
Регистрация: 16.10.2005
По умолчанию 31.07.2015, 01:20

Напишите мне на мыло из профиля
Ответить с цитированием
  (#3 (permalink)) Старый
ur_naz ur_naz вне форума
Member
 
Сообщений: 13
Сказал(а) спасибо: 1
Поблагодарили 1 раз в 1 сообщении
Регистрация: 07.11.2011
По умолчанию 02.08.2015, 00:27

Как-то так...
lisp Код:
(defun count-if (f lst)
  (cond
    ((null lst) 0)
    ((listp lst)
     (+ (count-if f (car lst))
        (count-if f (cdr lst))
     )
    )
    ((funcall f lst) 1)
    (T 0)
  )
)
(count-if 'minusp '(0 -2 3 3))

==> 1
Ответить с цитированием
Ads
Ответ

Опции темы
Опции просмотра

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Trackbacks are Вкл.
Pingbacks are Вкл.
Refbacks are Выкл.


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Задача VBA bucha20 Задания за деньги 0 25.05.2013 17:26
Задача на VB haVVVok Visual Basic 0 03.12.2012 10:58
С++. Задача licenok1_07 Вопросы начинающих программистов 7 19.10.2011 19:32
Помогите, задача по прологу, срочно...задача с высказываниями 4ixOn Prolog 6 10.07.2011 23:29
Помогите, задача по прологу, срочно...задача о станках 4ixOn Prolog 3 09.07.2011 22:48
Задача bumercs Delphi 3 30.09.2010 02:00
HELP! Задача alex3820 Prolog 6 19.07.2008 02:37
Задача ,,,'..',,, Prolog 7 29.04.2008 18:09
Задача D-Za Visual Basic 0 19.04.2007 13:51
Задача по TP&7.0 Nook Pascal 1 17.01.2007 22:58
А,В,С- задача про них!! Anonymous Вопросы начинающих программистов 0 08.01.2004 22:22



Powered by vBulletin® Version 3.8.7
Copyright ©2000 - 2018, Jelsoft Enterprises Ltd.
Нardforum.ru - компьютерный форум и программирование, форум программистов