9 lines
156 B
Racket
9 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)))
|