Cuban primes: Difference between revisions
m
→{{header|Perl 6}}: Remove concurrency and intermediate variables where they don't add anything
(Added Algol 68) |
Thundergnat (talk | contribs) m (→{{header|Perl 6}}: Remove concurrency and intermediate variables where they don't add anything) |
||
Line 633:
for 2..10 -> \k {
next if k %% 3;
my @cubans = lazy (1..Inf
put "First 20 cuban primes where k = {k}:";
put @cubans[^20]».&comma».fmt("%7s").rotor(10).join: "\n";
Line 669:
my \k = 2**128;
put "First 10 cuban primes where k = {k}:";
.&comma.put for
<pre>First 10 cuban primes where k = 340282366920938463463374607431768211456:
115,792,089,237,316,195,423,570,985,008,687,908,160,544,961,995,247,996,546,884,854,518,799,824,856,507
| |||