本文介绍了一个用于构建数据树的算法，该算法通过递归方式创建一个由节点组成的树形结构。每个节点包含特定的数据和指向子节点的链接。具体实现上，函数根据给定的两个整数参数来确定树的构建范围。
调了一晚上……
data Tree=Tree Int Int [Tree] [Tree]|Empty deriving (Show)
build :: (Int,Int)->Treebuild (x,y)=if x<y then Tree x y [build (x,(div (x+y) 2))] [build ((div (x+y) 2)+1,y)] else Tree x y [Empty] [Empty]
Haskell线段树建树
最新推荐文章于 2022-06-30 20:41:36 发布
build (x,y)=if x<y then Tree x y [build (x,(div (x+y) 2))] [build ((div (x+y) 2)+1,y)] else Tree x y [Empty] [Empty]
扫一扫
311
被折叠的 条评论
为什么被折叠?
到【灌水乐园】发言
