小编mer*_*man的帖子

我正在使用 DrRacket 6.4 版（英语）在Scheme 中创建一个小应用程序。我想知道是否有更有效的方法来连接以下代码。[它有效，我只是不确定它是否是最干净的，因为我是计划的新手]

    (display "Rolling ")
    (display (number->string (- 5 (length my-rolled-dice))))
    (display " dice\n")
    (display "You rolled\n")
    (define my-roll (make-list-of-random-numbers (- 5 (length my-rolled-dice) ) 6))
    (display my-roll)
    (display "\n")

我正在寻找屏幕上的以下输出

Rolling 5 dice
You rolled
(3 1 3 6 6)

有没有更干净的方法来编写这个，或者这是否像Scheme中那样干净？