5 lines
65 B
Plaintext
5 lines
65 B
Plaintext
(let x 0)
|
|
(while (!= x 10000)
|
|
(set x (+ 1 x))
|
|
(print x)
|
|
) |