7 lines
99 B
Common Lisp
7 lines
99 B
Common Lisp
(loop for i from 1 to 4000000 do (if (self-described-p i) (print i)))
|
|
|
|
1210
|
|
2020
|
|
21200
|
|
3211000
|
|
NIL
|