Look-and-say sequence: Difference between revisions
Content deleted Content added
→{{header|Perl}}: added php |
|||
Line 667: | Line 667: | ||
$num = lookandsay($num); |
$num = lookandsay($num); |
||
}</lang> |
}</lang> |
||
=={{header|PHP}}== |
|||
<lang php><?php |
|||
function lookandsay($str) { |
|||
return preg_replace('/(.)\1*/e', 'strlen($0) . $1', $str); |
|||
} |
|||
$num = "1"; |
|||
foreach (range(1,10) as $i) { |
|||
echo "$num\n"; |
|||
$num = lookandsay($num); |
|||
} |
|||
?></lang> |
|||
=={{header|PowerShell}}== |
=={{header|PowerShell}}== |