Форум программистов, компьютерный форум, киберфорум
Наши страницы
Lisp
Войти
Регистрация
Восстановить пароль
 
Натуля
0 / 0 / 0
Регистрация: 05.11.2013
Сообщений: 16
#1

Определить максимальное количество идущих подряд списков (Scheme)

07.10.2016, 22:57. Просмотров 317. Ответов 2
Метки нет (Все метки)

Для заданного списка определить максимальное количество идущих подряд списков.

Добавлено через 22 часа 25 минут
Ну помогите пожалуйста с задачкой!
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
07.10.2016, 22:57
Ответы с готовыми решениями:

Для заданного списка определить максимальное количество идущих подряд списков из одного элемента
Для заданного списка определить максимальное количество идущих подряд списков из одного элемента,...

Для заданного списка определить максимальное количество идущих подряд нулей
Для заданного списка определить максимальное количество идущих подряд нулей, без использование...

Функция: найти количество троек подряд идущих одинаковых элементов списка
написать функцию, вычисляющую количество троек подряд идущих элементов числового списка, в каждой...

Определить, есть ли в списке два подряд идущих пустых списка
Определить, есть ли в списке два подряд идущих пустых списка. Использование встроенных функций...

Как построить список, элементами которого являются суммы соответствующих элементов двух заданных списков в scheme
Здравствуйте. Помогите с решением задачи Мне нужно получить список, элементами которого являются...

2
Catstail
Модератор
23579 / 11679 / 2044
Регистрация: 12.02.2012
Сообщений: 19,057
09.10.2016, 20:38 #2
Lisp
1
2
3
4
5
6
7
8
(define (task lst)
  (define (count x c m)
     (cond ((null? x) (if (> c m) c m))
           ((list? (car x)) (count (cdr x) (+ c 1) m))
           (#t (if (> c m) (count (cdr x) 0 c) (count (cdr x) 0 m)))))
  (count lst 0 0))
 
  (display (task '(1 2 (1) (2) (3) 4 5 (6))))
http://ideone.com/g1rKif
1
Натуля
0 / 0 / 0
Регистрация: 05.11.2013
Сообщений: 16
10.10.2016, 00:01  [ТС] #3
Спасибо большое)
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
10.10.2016, 00:01

Определить функцию, подсчитывающую количество под- списков в нём на всех уровнях
Дано S-выражение. Определить функцию, подсчитывающую количество под- списков в нём на всех...

Определить максимальное количество дочерних узлов в дереве
Добрый вечер. Требуется написать программу, определяющую максимальное количество дочерних узлов в...

Замена в исходном списке двух подряд идущих одинаковых элементов одним
Определите функцию, заменяющую в исходном списке два подряд идущих одинаковых элемента одним. Как...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru