RosettaCodeData/Task/Pernicious-numbers/Mathematica/pernicious-numbers-4.math

2 lines
56 B
Text
Raw Permalink Normal View History

2015-02-20 09:02:09 -05:00
Cases[Range[888888877, 888888888], _?(perniciousQ@# &)]