Question

我在Haskell作业中要做的一件事就是编写一个将八进制数转换为二进制数的函数，事情是特别要求输入必须是一个字符串。

我想我会这样写：

okt2bin:: String -> String
okt2bin n     
       |n == "0" = "000"
       |n == "1" = "001"
       |n == "2" = "010"
       |n == "3" = "011"
       |n == "4" = "100"
       |n == "5" = "101"
       |n == "6" = "110"
       |n == "7" = "111"

问题是，我不能让它用于多位数字。有人可以帮忙吗？

Answer 1

你可以为一个数字写一个函数，看起来几乎相同：

octDigit2Bin :: Char -> String
octDigit2Bin n
       |n == '0' = "000"
       |n == '1' = "001"
       |n == '2' = "010"
       |n == '3' = "011"
       |n == '4' = "100"
       |n == '5' = "101"
       |n == '6' = "110"
       |n == '7' = "111"

之后你可以使用nice属性，你可以通过转换每个数字将多位八进制数转换为二进制数，因为8是2的幂，例如＆＃34; 75＆＃34;可以通过改变＆＃39; 7＆＃39;进入＆＃34; 111＆＃34;和＆＃39; 5＆＃39;进入＆＃34; 101＆＃34;因此＆＃34; 75＆＃34;是＆＃34; 111101＆＃34;：

okt2bin :: String -> String
okt2bin xs = concatMap octDigit2Bin xs

Answer 2

在'Numeric'模块中有处理不同整数编码的函数，它是'base'的一部分。

因为它是作业，我猜你的目的是计算二进制表示，并能够转换任意八进制编码整数。

将八进制转换为二进制

2 个答案: