代码高尔夫：数字到单词

Question

代码高尔夫系列似乎相当受欢迎。我遇到了一些将数字转换为单词表示的代码。一些例子是（编程乐趣的2的权力）：2 - >两个1024 - >一千二十四1048576 - >百万四万八千七百六十六我的同事出现的算法差不多有两百行。似乎会有更简洁的方法来做到这一点。现行指南：以任何编程语言欢迎提交的内容（我向PhiLho道歉，因为最初对此不太清楚）最大输入为2 ^ 64（请参阅以下链接，感谢mmeyers）英语输出的缩放比例较低，但欢迎使用任何算法。只需对编程语言一起评论所使用的方法。

Answer 1

Lisp，仅使用标准函数：

(format nil "~r" 1234) ==> "one thousand two hundred thirty-four"

奖金：

(format nil "~@r" 1234)  ==> "MCCXXXIV"