0 / 0 / 0
Регистрация: 18.10.2012
Сообщений: 57
1

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

12.11.2012, 10:58. Показов 2520. Ответов 4
Метки нет (Все метки)

написать функцию которая на основе двух списков формирует новый список в котором чередуются элементы исходных

Добавлено через 1 минуту
и второе написать функцию аргументами которой являются два списка находящую все их общие атомы
__________________
Помощь в написании контрольных, курсовых и дипломных работ, диссертаций здесь
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
12.11.2012, 10:58
Ответы с готовыми решениями:

Из двух однонаправленных списков сформировать новый список
Из двух однонаправленных списков сформировать новый список, следующим образом: сначала записать...

Сформировать новый список, в котором элементы расположены в порядке возрастания
Дан список F=<1,8,9,0,1,3,2,4,1,12,23,1,23,2,19,1>.Сформировать новый список в котором элементы...

Сформировать новый список в котором элементы расположены в порядке возростания
Дан список F=<1,8,9,0,1,3,2,4,1,12,23,1,23,2,19,1>.Сформирова ть новый список в котором элементы...

Список: Сформировать третий список, содержащий числа Фибоначи исходных списков
Дано два однонаправленных списка целых чисел.Сформировать третий список, содержащий числа Фибоначи...

4
Модератор
Эксперт функциональных языков программированияЭксперт Python
33119 / 18460 / 3884
Регистрация: 12.02.2012
Сообщений: 31,028
Записей в блоге: 12
12.11.2012, 11:58 2
1.

Lisp
1
2
3
4
5
6
7
8
9
(defun zip (x y) (cond ((null x) y)
                       ((null y) x)
                       (t (cons (car x) (cons (car y) (zip (cdr x) (cdr y)))))))
 
==> zip
 
(zip '(1 2 3 4) '(a b c d))
 
==> (1 a 2 b 3 c 4 d)
Добавлено через 2 минуты
2.

Lisp
1
2
3
4
5
6
7
8
9
10
11
12
(defun common-atom (x y)
   (cond ((null x) nil)
         ((null y) nil)
         ((member (car x) y) (cons (car x) (common-atom (cdr x) y)))
         (t (common-atom (cdr x) y))))
                     
 
==> common-atom
 
(common-atom '(1 2 3 4) '(3 5 2))
 
==> (2 3)
1
0 / 0 / 0
Регистрация: 18.10.2012
Сообщений: 57
12.11.2012, 12:22  [ТС] 3
спасибо.но уже поздно
0
Эксперт С++
5825 / 3476 / 358
Регистрация: 08.02.2010
Сообщений: 7,448
12.11.2012, 12:37 4
Лучший ответ Сообщение было отмечено как решение

Решение

По первой задаче:
Lisp
1
2
(defun interleave (x y)
  (mapcan #'list x y))
2
4662 / 4358 / 376
Регистрация: 12.05.2012
Сообщений: 3,075
12.11.2012, 13:02 5
Lisp
1
2
3
4
5
6
7
8
(defun mix-elements (w v)
  (cond ((null w) v) ((null v) w) ((mi w v))))
 
(defun mi (w v)
  (when w (cons (car w) (mi v (cdr w)))))
 
> (mix-elements '(1 2 3) '(a b c))
(1 A 2 B 3 C)
2
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
12.11.2012, 13:02
Помогаю со студенческими работами здесь

Функция: сформировать список to, включив в него поочередно элементы из списков from1 и from2
Добрый день, форумчане! Столкнулся с такой задачей: OneByOne (Object &to, Object &from1, Object...

Создать новый список из двух других, чтобы он содержал равные элементы из двух других списков
Здравствуйте, подскажите пожалуйста, как можно создать новый список из двух других, чтобы он...

Сформировать массив на основе двух исходных
Создал код для создания двух массивов в Memo1 и Memo2. В каждом из них с помощью кода могу найти...

Сформировать матрицу на основе двух исходных по правилу
Здравствуйте! Помогите с решением, пожалуйста.. Даны матрицы А(3,3) и В(3,3). Сформировать...

Сформировать третий массив на основе двух исходных
Даны два массива А и В одинаковой размерности. Сформировать третий массив С, образованный из двух...

Список: Сформировать из 3 списков новый, изъяв элементы, которые совпадают (логическое "ИЛИ")
Помогите разработать рекурсивную функцию для работы со списками:


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

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

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2022, CyberForum.ru