3 lines
107 B
Factor
3 lines
107 B
Factor
USING: io kernel math.primes.factors prettyprint sequences ;
|
|
|
|
: semiprime? ( n -- ? ) factors length 2 = ;
|