在 haskell 中，如何从十进制数中生成二进制数字？

Question

实现Bin函数，倒序返回一个非负整数的二进制数！

例子：

• Bin 0 == []
• Bin 1 == [1]
• Bin 2 == [0,1]
• Bin 10 == [0, 1, 0, 1]

Bin :: Integer -> [Int]
Bin 0 = []
Bin a `div` 2 = b
Bin a `mod` 2 = c

我想将我的除法结果返回给 Bin 函数并再次对其进行修改等等。 我该如何解决这个问题？我能得到一些帮助吗？

Answer 1

只有一个参数，所以bin的实现如下：

bin :: Integer -> [Int]
bin 0 = []
bin n = …

我们可以用divMod :: Integral a => a -> a -> (a, a)确定模数并将数字除以2，我们可以使用where子句设置变量d和m：

bin :: Integer -> [Int]
bin 0 = []
bin n = …
    where (d, m) = divMod n 2

我们不能直接使用m，因为这是Integer，而不是Int，我们可以使用fromIntegral :: (Integral a, Num b) => a -> b将Integer转换为Int。

因此，我们需要构造一个以m 作为该列表元素的列表，并使用递归来确定列表中的其他项目。因此，… 部分应该构造这样的列表。我把它留作练习。提示：您可以使用x 作为第一项，将xs 作为剩余项目的列表，使用(x:xs)。