8 lines
156 B
Racket
8 lines
156 B
Racket
#lang racket
|
|
(let loop ()
|
|
(let/ec break
|
|
(define a (random 20))
|
|
(displayln a)
|
|
(when (= a 10) (break))
|
|
(displayln (random 20))
|
|
(loop)))
|