4 lines
100 B
Common Lisp
4 lines
100 B
Common Lisp
(let Doors (need 100)
|
|
(for I (sqrt 100)
|
|
(set (nth Doors (* I I)) T) )
|
|
(println Doors) )
|