Сдавать через 30 минут
Напишите рекурсивные предикат (на языке SWI-Prolog) и функцию (на языке Clisp), которые находят наибольшую длину убывающей последовательности подряд идущих элементов числового списка L.
Например: L=[1,2,0,-2,-3,4,2,1,6] ? 4 (SWI-Prolog),
L=(1 2 3 2 1 5 6 7 4 5) ? 3 (Clisp).