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

Замены всех нечетных (по номеру) элементов списка, начиная с N-ой позиции

29.05.2019, 02:37. Показов 2006. Ответов 1

Author24 — интернет-сервис помощи студентам
Помогите написать программу для задания: Написать программу замены всех нечетных (по номеру) элементов списка, начиная с N-ой позиции, на произвольную константу.

Prolog
1
2
3
4
5
6
7
8
9
10
11
domains
i=integer
il=i*
predicates
z1(i,i,il,il)
clauses
z1(__,_,[],[]).
z1(S,K,[_|Tail],[K|Tail]):- S mod 2 <> 0.
z1(N,K,[_|Tail],[X|Tail1]):-N1=N+1, z1(N1,K,Tail,Tail1).
goal
z1(1,90,[2,-9,11,83,4,5,10,-3,-8,9],L).
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
29.05.2019, 02:37
Ответы с готовыми решениями:

Удалить из исходного списка элементы, начиная с позиции K до позиции N
Удалить из исходного списка элементы, начиная с позиции K до позиции N

Найти количество всех элементов в нечетных по номеру строках матрицы
нужно найти количество всех элементов в нечетных по номеру строках матрицы, сделал что бы оно...

Вычислить сумму всех элементов в нечетных по номеру столбцах матрицы
Вычислить сумму всех элементов в нечетных по номеру столбцах матрицы

Удаление из списка всех элементов, начиная с к-го по порядку
Дан список идентификаторов. Длина каждого идентификатора не более 8 символов. Идентификаторы в...

1
692 / 5495 / 265
Регистрация: 11.08.2016
Сообщений: 3,419
29.05.2019, 17:49 2
Prolog
1
2
3
4
5
6
7
repl_odd_n_const([],_,_,[]).
repl_odd_n_const([_],N,C,[C]):-N<=0.
repl_odd_n_const([X],_,_,[X]).
repl_odd_n_const([_,X2|T],N,C,[C,X2|T1]):-N<=0,                                                            
                                                            repl_odd_n_const(T,N,C,T1).
repl_odd_n_const([X1,X2|T],N,C,[X1,X2|T1]):-N2=N-2,
                                                               repl_odd_n_const(T,N2,C,T1).
Примерно так...
Не отлаживал, так что возможно понадобится обработка напильником.
0
29.05.2019, 17:49
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
29.05.2019, 17:49
Помогаю со студенческими работами здесь

Написать и протестировать функцию для замены символов ‘:’ на ‘.’ в заданной строке, начиная с указанной позиции
Написать и протестировать функцию для замены символов ‘:’ на ‘.’ в заданной строке, начиная с...

Найти сумму чётных по номеру элементов массива и произведение нечётных по номеру
1. Линейный массив Найти сумму чётных по номеру элементов массива и произведение нечётных по...

Найти сумму четных по номеру элементов массива и произведение нечетных по номеру
Найти сумму четных по номеру элементов массива и произведение нечетных по номеру.

Произведение всех нечетных элементов списка SWI Prolog
Мужики, я уже боашку сломал, решил кучу задач на экзамене, последняя меня победила, не могу понять...


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

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

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