Wieferich primes: Difference between revisions
Content added Content deleted
(add PicoLisp) |
(→{{header|Ruby}}: Add Ruby) |
||
| Line 658: | Line 658: | ||
Found 2 Wieferich primes that are < 5,000 |
Found 2 Wieferich primes that are < 5,000 |
||
</pre> |
|||
=={{header|Ruby}}== |
|||
<lang ruby>require "prime" |
|||
puts Prime.each(5000).select{|p| 2.pow(p-1 ,p*p) == 1 } |
|||
</lang> |
|||
{{out}} |
|||
<pre>1093 |
|||
3511 |
|||
</pre> |
</pre> |
||