Anonymous user
Self-describing numbers: Difference between revisions
Adding solution in PHP
(→{{header|Perl 6}}: substitute faster algo) |
(Adding solution in PHP) |
||
Line 1,032:
3211000
</pre>
=={{header|PHP}}==
<lang PHP><?php
function is_describing($number) {
foreach (str_split((int) $number) as $place => $value) {
if (substr_count($number, $place) != $value) {
return false;
}
}
return true;
}
for ($i = 0; $i <= 50000000; $i += 10) {
if (is_describing($i)) {
echo $i . PHP_EOL;
}
}
?></lang>
Output:
<pre>1210
2020
21200
3211000
42101000</pre>
=={{header|PicoLisp}}==
| |||