Palindromic primes: Difference between revisions
Content added Content deleted
Alextretyak (talk | contribs) (Added 11l) |
SqrtNegInf (talk | contribs) m (→{{header|Perl}}: output formatting) |
||
Line 508: | Line 508: | ||
use warnings; |
use warnings; |
||
$_ == reverse and (1 x $_ ) !~ /^(11+)\1+$/ and print "$_ |
$_ == reverse and (1 x $_ ) !~ /^(11+)\1+$/ and print "$_ " for 2 .. 1e3;</lang> |
||
{{out}} |
{{out}} |
||
<pre>2 3 5 7 11 101 131 151 181 191 313 353 373 383 727 757 787 797 919 929</pre> |
|||
2 |
|||
3 |
|||
5 |
|||
7 |
|||
11 |
|||
101 |
|||
131 |
|||
151 |
|||
181 |
|||
191 |
|||
313 |
|||
353 |
|||
373 |
|||
383 |
|||
727 |
|||
757 |
|||
787 |
|||
797 |
|||
919 |
|||
929 |
|||
=={{header|Phix}}== |
=={{header|Phix}}== |