RosettaCodeData/Task/Semiprime/Factor/semiprime-2.factor

2 lines
55 B
Factor

100 <iota> [ semiprime? ] filter [ pprint bl ] each nl