在Prolog中删除第k个表亲的递归N次
是一个具体的问题，需要根据具体的情况来确定答案。以下是一个可能的解答：
在Prolog中，删除第k个表亲的递归N次可以通过以下步骤实现：
- 首先，定义一个规则来表示家族关系。例如，可以使用
parent(X, Y)表示X是Y的父母，sibling(X, Y)表示X和Y是兄弟姐妹关系。 - 接下来，定义一个递归规则来删除第k个表亲。首先，找到所有的表亲关系，然后根据k的值删除相应的表亲。可以使用
findall/3来找到所有的表亲关系，然后使用nth1/3来删除第k个表亲。 - 最后，使用递归来重复执行删除操作N次。可以使用计数器来控制递归的次数。
以下是一个示例代码：
% 定义家族关系
parent(john, mary).
parent(john, peter).
parent(john, ann).
parent(mary, david).
parent(mary, linda).
parent(peter, susan).
parent(peter, tom).
% 定义兄弟姐妹关系
sibling(X, Y) :- parent(Z, X), parent(Z, Y), X \= Y.
% 删除第k个表亲的递归规则
delete_kth_sibling(K, Siblings, Result) :-
findall(Sibling, sibling(_, Sibling), AllSiblings),
nth1(K, AllSiblings, KthSibling),
delete(Siblings, KthSibling, Result).
% 重复执行删除操作N次的递归规则
delete_kth_sibling_n_times(_, Siblings, 0, Siblings).
delete_kth_sibling_n_times(K, Siblings, N, Result) :-
delete_kth_sibling(K, Siblings, NewSiblings),
N1 is N - 1,
delete_kth_sibling_n_times(K, NewSiblings, N1, Result).在上述代码中，delete_kth_sibling/3规则用于删除第k个表亲，delete_kth_sibling_n_times/4规则用于重复执行删除操作N次。
这是一个简单的示例，实际应用中可能需要根据具体情况进行修改和扩展。对于更复杂的问题，可能需要使用更多的规则和谓词来表示和处理家族关系。
相关·内容
我正在尝试用prolog计算一个递归关系，老实说，我的头都要爆炸了。我知道表亲，第N表亲和删除之间的关系，但我很难让它在这种不太常见的语言中工作，因为我已经有了这样的定义；我在其他帖子中也看到过类似的关系，但它们并没有充分利用我已经建立的最佳关系。下面是我所拥有的与实现这一目标相关的工作关系。 第N</
浏览 21提问于2020-11-02得票数 0
回答已采纳
1回答
写一个程序，当给一个参考的人和一个学位，程序可以告诉我所有的第n级表亲的人有。我开始写我的事实:男性/1女性/1和儿童/2-这些都是我的家庭成员的名字。，我要找到一个表弟，但是第二个表哥更复杂，这让我觉得必须有一个递归的方法。我需要这个规则，all_cousins(Person, Degree, ListOfCous
浏览 2提问于2021-10-18得票数 1
可以通过下面的递归进行： josephus(1, k) = 1
这种递归关系是如何推导出来的？
浏览 0提问于2012-08-28得票数 3
我是prolog的新手，所以我必须向我的班主任解释这些代码。有人能解释一下这个密码吗。谢谢nr_vowel([],0).产出：
1 ?- nr_vowel([a,t,i,k</
浏览 1提问于2016-12-13得票数 0
N元素集合的第k个分位数是k-1个顺序统计量，它将排序后的集合划分为k个大小相等的集合(小于1)。给出了一个列出集合第k个分位数的O(n lg k)-time算法。在select过程中找到索引'i‘处的中位数后，我们进行以下递归调
浏览 0提问于2010-10-11得票数 8
这是我第一次在这里问问题，但我有一个问题，我真的无法解决，那就是Prolog递归，特别是当它处理list时。因此，我应该解决的任务是编写一个像这样工作的drop谓词。例如，drop([1,2,3,4,5,6,7,8,9], 2, L)，L = [1,3,5,7,9]和N=n，其中元素位于n，2n，3n.将被移除。从1开始的列表是另一件需要注意的事
浏览 2提问于2015-03-03得票数 0
回答已采纳
下面是我用Prolog编写的代码的主要部分： get_initial_state('test.csv',S),state_sequence(N, S, Sf) :- N > 0,N1 is <
浏览 0提问于2018-03-06得票数 0
我是Prolog的新手，尝试在Prolog中实现获取列表的第n个元素这里是我的代码，但它抛出了错误element_at(X,[_|L],K) :-K > 1, element_at(X,L,K1).我认为代码右侧第二行中
浏览 0提问于2013-12-05得票数 2
我知道如何以过程方式(即C++、Java等)在BST上执行范围查询，但我发现很难将其转换为Prolog语言。非常感谢大家
浏览 2提问于2013-12-09得票数 3
回答已采纳
2回答
无限弦
、、
所有单词都由小写字母和数字组成，然后我们将所有的N个单词连在一起形成一个更大的字符串A.An无限字符串S是通过递归地在A上执行无限步来构建的:在第一步中，A是与′$′ I次连接的，后面是A的反向。例如:设N为3，每个单词为'1'，'2‘和'3’连接后，我们得到了a是321的321逆序，在第
浏览 6提问于2017-10-31得票数 0
回答已采纳
2回答
我是第一次接触prolog，我有一个类似A=[1,2,3,4]的prolog列表，然后我使用nth(N,[_|T],R)访问了第n个元素。现在我在R中有了第N个元素，然后我在R上做了一些计算。现在我想要的是更新列表中的第n个元素。
因为我对
浏览 0提问于2012-11-20得票数 2
我能构建一个算法FindStats(A，k)吗？我知道有一个算法QuickSelect(A，k) (确定性算法)，它在线性时间内返回k‘阶统计量，但在我的
浏览 5提问于2018-12-19得票数 1
1回答
无迹就地选择排序
、、、、
您将看到一个长度为n的数组A1..n，每个单元格包含apair。所有的高度值都是不同的，所有的权重值也是不同的。对数组按高度升序排序的任务是设计一种递归分治算法，即给定一个整数k values.Your 1，n，找到权值最小的第k个条目。在每一级递归中，你只能使用O(1)个额
浏览 7提问于2019-10-15得票数 0
1回答
我是一个Prolog初学者，有命令式编程背景。在解决来自的作业时，我遇到了两个练习:第一个练习是关于找到列表的第k个元素，第二个是关于找到列表长度的练习。就我而言，这个谓词迫使Prolog进行算术计算，并可能将结果赋值给左侧项。我被告知要注意的是，虽然在右边使用变量是可能的，但在评估时必须用一个</em
浏览 3提问于2018-08-24得票数 3
回答已采纳
1回答
我正在用函数式语言(ML)编写几个递归函数，在其中的几个函数中有必要进行计数。我不允许使用尾递归或助手函数。我应该如何计算？例如，如果一个问题要求我删除字符串的第n个元素，那么在删除该元素之前，我如何知道递归函数已被调用了n次？
浏览 2提问于2017-02-07得票数 0
1回答
我正在学习Prolog，最近我发现了一段音符：-
列表的第0元素是列表的首(第一个子句)，否则我们使用列表尾部的第一
浏览 0提问于2014-02-27得票数 1
回答已采纳
3回答
使用单个堆栈生成置换
、、、
如果只使用一个堆栈，可以解释生成排列的算法吗? push和pop是唯一允许的操作。已经找了很多遍了，但没有确切的答案。此外，这类排列的总数是由加泰罗尼亚数给出的。但我找不到证据。
浏览 6提问于2011-06-25得票数 7
1回答
我试图递归地将列表的头追加到一个原子中，但是prolog一直返回false，我无法确定原因。我的原始代码： append([K], [H1], L),跑得像：预期产出：
[k, a, k, b, <em
浏览 3提问于2017-12-05得票数 0
回答已采纳
我试着写代码在Prolog中找到一个最小的数组(有>1个元素)。min([H,T|[]], H) :- H < T.min([H|T], M) :- min(T, N), min([H|N], M).但是当我尝试运行它的时候：它进入到涉及单个数组的递归中。但我的第一
浏览 0提问于2018-11-11得票数 0
1回答
这是一个数据结构和算法课程的家庭作业问题。我不想让任何人帮我做作业。只是希望有人能告诉我，如果我处理得当。= lo; k <= hi; k++) if (i > mid) else
a[k] = aux[i++];
浏览 1提问于2018-10-03得票数 1
回答已采纳
云服务器
ICP备案
实时音视频
对象存储
即时通信 IM
腾讯云开发者
