Почему не считает количество элементов списка x, не превосходящих элемент а? - Lisp

  1. Почему не считает количество элементов списка x не превосходящих элемент а.И как изменить код что бы начал считать?


textual

Код к задаче: «Почему не считает количество элементов списка x, не превосходящих элемент а? - Lisp»

(defun f (a x)
 (if (< (car x) a) (+ 1) (+ 0))
 (if (< (cadr x) a) (+ 1) (+ 0))
 (if (< (caddr x) a) (+ 1) (+ 0)))

СДЕЛАЙТЕ РЕПОСТ

9   голосов, оценка 3.778 из 5



Похожие ответы
  1. После года самостоятельного изучения Python в качестве первого и основного ЯП, пришел я в университет в магистратуру, где в качестве функционального ЯП предлагается писать задачи на Scheme. Привыкнув писать по императивной парадигме, спотыкаться начал практически сразу же. Например. Требуется написать программу, которая вычисляет день недели по дате. Пусть процедура принимает год-месяц-день и возвращает числа от 0 (понедельник) до 6 (воскресенье). Покопавшись по вопросу реализации подобного алгоритма, набрёл на интересное решение на Python:Python1 2 3 4 5 6 7 def whatDay(day, month, year):     days = ["пн","вт","ср","чт","пт","сб","вс"]     a = (14 - month) // 12     y = year - a     m = month+12 * a-2     result = ((7000 + (day + y + y//4 - y//100 + y//400 + (31*m) // 12)) % 7) - 1     return days[result]Не получается перестроить данное решение под, собственно, Scheme. Пробовал так:

  1. Не получается написать функцию, которая принимает на вход список, и преобразует его следующим образом: после каждого неотрицательного элемента добавляет звездочку. Например: исходный список: (0 b a -2 4) преобразованный список: ((0 *) b a -2 (4 *)) Помогите, пожалуйста!Добавлено через 22 минуты Ошибку выдает компилятор: sh-4.4$ clisp main.lisp *** - >: NIL is not a real number

  1. Буду очень благодарна и признательна если кто в этом разбирается и поможет. Необходимо на Лиспе написать программу вычисления дискриминанта квадратного уравнения. Свои наброски есть, но не уверена что правильно сделала.

  1. Здравствуйте, захотел попробовать библиотеку CLAZY. Установил Quicklisp, затем успешно применил

  1. Помогите пожалуйста. написать на лиспе функцию fibo2, вычисляющие числа Фибоначчи линейной рекурсии с одним рекурсивным вызовом.

  1. Помогите пожалуйста решить Используя функцию DEFUN определить функцию f (a x), где a - S-выражение, а x - список, состоящий из 2-3 элементов, которая выдает количество элементов списка x, не превосходящих a.

  1. Получить новый отсортированный список путем вставки заданного элемента в исходный отсортированный в порядке возрастания элементов список.

  1. Привет. Помогите с лиспом. нужно реализовать математический нейрон. Число входов = 3 Функция активации = пороговая.

  1. Доброго времени суток Необходимо определить степень связности неориентированного графа. Под степенью связности графа понимается некоторое число R, такое, что между любыми двумя узлами графа имеются не менее R путей. Честно говоря, с трудом представляю, как это должно выглядеть на Лиспе. Помогите, пожалуйста. Заранее спасибо.