Найти индекс n-го отрицательного вхождения (желательно Scheme) - Lisp
Формулировка задачи:
Найти индекс n-го отрицательного вхождения.
Пример:
task('(3 -2 -4 -7 9), 2)
-> 3
Решение задачи: «Найти индекс n-го отрицательного вхождения (желательно Scheme)»
textual
Листинг программы
- (defun F (L P)
- (if (null L) nil
- (if (minusp (car L))
- (if (= 1 P) 0
- (1+ (F (cdr L) (1- P))))
- (1+ (F (cdr L) P)))))
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д
