Almost prime: Difference between revisions

=={{header|PHP}}==

{{trans|FreeBASIC}}

<lang php>

<?php

// Almost prime

function isKPrime($n, $k)

{

$f = 0;

for ($j = 2; $j <= $n; $j++) {

while ($n % $j == 0) {

if ($f == $k)

return false;

$f++;

$n = (int)($n / $j);

} // while

} // for $j

return ($f == $k);

}

for ($k = 1; $k <= 5; $k++) {

echo "k = ", $k, ":";

$i = 2;

$c = 0;

while ($c < 10) {

if (isKPrime($i, $k)) {

echo str_pad($i, 3, ' ', STR_PAD_LEFT), " ";

$c++;

}

$i++;

}

echo PHP_EOL;

}

?>

</lang>

{{out}}

<pre>

k = 1: 2 3 5 7 11 13 17 19 23 29

k = 2: 4 6 9 10 14 15 21 22 25 26

k = 3: 8 12 18 20 27 28 30 42 44 45

k = 4: 16 24 36 40 54 56 60 81 84 88

k = 5: 32 48 72 80 108 112 120 162 168 176

</pre>