Strawberry Prolog Удаление N первых элементов в списке
Формулировка задачи:
Нужно решить в
Strawberry Prolog
задачу:Удаление N первых элементов в списке.
Написала. Но при компиляции выдает ошибку. Помогите найти ошибку, пожалуйста!
Листинг программы
- delete(0, L, L).
- delete(3, [], []).
- delete(N, [3|T1], L2) :-
- N > 0,
- N1 is N-1,
- delete(N1, T1, L2).
- delete(N, [1, 2, 4, 8, 16], X1), write(X1), nl.
Решение задачи: «Strawberry Prolog Удаление N первых элементов в списке»
textual
Листинг программы
- delete_n(0, L, L).
- delete_n(_, [], []).
- delete_n(N, [_|T1], L2) :-
- N > 0,
- N1 is N-1,
- delete_n(N1, T1, L2).
- test :-
- %Test = [1,2,3,4,5,6,7,8,9,0],
- Test = [1,2,4,8,16],
- delete_n(3, Test, X1),
- write(X1), nl.
- ?-test.
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д
