Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Применение рекурсии для обработки списков, Применение рекурсии для обработки списко 
:(
    Опции темы
Линус
Дата 9.1.2015, 19:33 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 16
Регистрация: 8.12.2014

Репутация: нет
Всего: нет



1) Сложить два списка следующим образом: a1+bn, a2+bn-1, ...,an-1+b2, an+b1.
2) Все вхождения заданного элемента уменьшите на заданное число.
1)reverse([X], [X]):-!.
reverse([X | T], Z):- reverse(T, W), append(W, [X], Z).
append([],L,L):-!.
append([H|T],P,[H|Y]):-append(T,P,Y).
sum_lists([],[],[],[]).
sum_lists([],[],M,M).
sum_lists([H1|T1],[H2|T2],L,List):-N is H1+H2,append([N],L,List2),sum_lists(T1,T2,List2,List).
sum_rev_lists(L1,L2,List):- reverse(L2,L),sum_lists(L1,L,[],List).
2)append([],L,L):-!.
append([H|T],P,[H|Y]):-append(T,P,Y).
dec_n_all([],_,_,M,M):-!.
dec_n_all([H|T],N,K,L,List):- H=\= N,append(L,[H],L2),dec_n_all(T,N,K,L2,List).
dec_n_all([_|T],N,K,L,List):- H1 is N-K,append(L,[H1],L2),dec_n_all(T,N,K,L2,List).
Решила задачи, но не могу объяснить на языке SWI Prolog, помогите пожалуйста.
PM MAIL   Вверх
Google
  Дата 23.5.2019, 00:48 (ссылка)  





  Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума Prolog
Void
  • Пожалуйста, создавайте темы с содержательными названиями.
  • Уважаемые учащиеся, здесь всегда рады помочь Вам, но не делать за Вас вашу работу. У вас гораздо больше шансов получить помощь, если Вы приложите усилия и поделитесь с нами проблемами и результатами. В противном случае добро пожаловать в раздел Центр Помощи.
  • Получив ответ на интересующий Вас вопрос, не забудьте пометить его как решённый.

Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Void.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Prolog | Следующая тема »


 




[ Время генерации скрипта: 0.1093 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.