方案二进制列表到十进制和

Question

一个接受二进制数列表并返回它们的十进制和的函数。

Call: (addBinary '(1101 111 10 101))

(define (addBinary binaryList))

returns 27

Answer 1

在 Guile 和 Racket 中测试：

(define (addBinary binaryList)
  (apply +
         (map (lambda (n)
                (string->number
                 (number->string n) 2))
              binaryList)))