Dokonalá čísla PHP
<?php for($delenec = 1; $delenec <= 100000; $delenec++){ $cislo = 0; for($delitel = 1; $delitel < $delenec; $delitel++) { if($delenec % $delitel == 0) { $cislo+=$delitel; } if(($delenec == $cislo) && ($delitel == $delenec-1)) echo($delenec.', '); } } ?>Program byl vytvořen v roce 2012.