Scheme 如何在方案中给一个数字一个前导零

在scheme语言中，如何给一个数字一个前导零？

---

例如，我希望给出的时间是上午9:05，在9和5之前有一个前导零，而不是上午9:5。

这在很大程度上取决于您使用的解释器。例如，在Racket中，我们就是这样做的：

(format "~a:~a AM"
        (~r 9 #:min-width 2 #:pad-string "0")
        (~r 5 #:min-width 2 #:pad-string "0"))

=> "09:05 AM"

---

这在很大程度上取决于您使用的解释器。例如，在Racket中，我们就是这样做的：

(format "~a:~a AM"
        (~r 9 #:min-width 2 #:pad-string "0")
        (~r 5 #:min-width 2 #:pad-string "0"))

=> "09:05 AM"