为常见的lisp生成一定范围内的随机数

Question

我正在做一些功课，而且我必须生成10到80范围内的随机数。我知道（随机80）会返回一个小于80的数字但我如何得到它来得到数字到还要高于10？谢谢你提前。

Answer 1

提示：（+ 1（随机80））将为您提供1到80之间的数字。

Answer 2

此代码将为您提供10到80之间的随机数字：

(+ 10 (random 71))

更好，试试这个通用公式：

(defun random-from-range (start end)
  (+ start (random (+ 1 (- end start)))))