列表数据结构中的递归过程

发布于 2024-10-15 11:31:17 字数 516 浏览 2 评论 0原文

这是一个返回列表 1 中最后一项的过程：

proc last (1)
if    (isEmpty(1))
       error('Oops. Empty list in procedure last.')
elseif (is empty(rest1))
       return (first(1)
else   return last(rest(1))

修改它以创建一个返回列表 1 中的项目 i 的递归过程 getItem(i,l)，其中 i 是大于零的整数。

proc getItem(i,1)
if    (isEmpty(1))
      error('Opps. Empty list in procedure last.')
else if (isEmpty(getItem,i1)
else if i > 0
      return item(i,1)

这是正确的吗？

原文

This is a procedure to return the last item in a list 1:

proc last (1)
if    (isEmpty(1))
       error('Oops. Empty list in procedure last.')
elseif (is empty(rest1))
       return (first(1)
else   return last(rest(1))

Modify that to create a recursive procedure getItem(i,l) that returns item i in a list 1, where i is an integer greater than zero.

proc getItem(i,1)
if    (isEmpty(1))
      error('Opps. Empty list in procedure last.')
else if (isEmpty(getItem,i1)
else if i > 0
      return item(i,1)

is that correct?

分享到QQ

分享到微博

如果你对这篇内容有疑问，欢迎到本站社区发帖提问参与讨论，获取更多帮助，或者扫码二维码加入 Web 技术交流群。

发布评论

需要登录才能够评论，你可以免费注册一个本站的账号。

顾挽 2024-10-22 11:31:17

为了让它递归地工作，最后一行需要与函数具有相同的名称。

除此之外，你需要减少 i ....否则你不会移动...

应该是这样的：

proc getItem(i,1)
if    (isEmpty(1))
      error('Opps. Empty list in procedure last.')
else if (i > 0)
     return getItem(i-1,1)
else return first(1)

For it to work recursively, that last line needs to have the same name of the function.

Besides that, you need to decrease i .... otherwise you aren't moving...

should be something like:

proc getItem(i,1)
if    (isEmpty(1))
      error('Opps. Empty list in procedure last.')
else if (i > 0)
     return getItem(i-1,1)
else return first(1)

回复收藏 0 原文