5 lines
150 B
Text
5 lines
150 B
Text
|
(import (otus random!))
|
||
|
|
|
||
|
|
(define x '("Monday" "Tuesday" "Wednesday" "Thursday" "Friday" "Saturday" "Sunday"))
|
||
|
|
(print (list-ref x (rand! (length x))))
|