Semiprime: Difference between revisions
Content added Content deleted
(Added F# version) |
|||
Line 311: | Line 311: | ||
55, 57, 58, 62, 65, 69, 74, 77, 82, 85, 86, 87, 91, 93, 94, 95}</pre> |
55, 57, 58, 62, 65, 69, 74, 77, 82, 85, 86, 87, 91, 93, 94, 95}</pre> |
||
=={{header|Objeck}}== |
|||
<lang objeck> |
|||
class SemiPrime { |
|||
function : Main(args : String[]) ~ Nil { |
|||
for(i := 0; i < 100; i+=1;) { |
|||
if(SemiPrime(i)) { |
|||
"{$i} "->Print(); |
|||
}; |
|||
}; |
|||
IO.Console->PrintLine(); |
|||
} |
|||
function : SemiPrime(n : Int) ~ Bool { |
|||
nf := 0; |
|||
for(i := 2; i <= n; i+=1;) { |
|||
while(n%i = 0) { |
|||
if(nf = 2) { |
|||
return false; |
|||
}; |
|||
nf+=1; |
|||
n /= i; |
|||
}; |
|||
}; |
|||
return nf = 2; |
|||
} |
|||
}</lang> |
|||
Output: |
|||
<pre>4 6 9 10 14 15 21 22 25 26 33 34 35 38 39 46 49 51 55 57 58 62 65 69 74 77 82 85 86 87 91 93 94 95</pre> |
|||
=={{header|PARI/GP}}== |
=={{header|PARI/GP}}== |