Rosetta Code

Cuban primes: Difference between revisions

Page Discussion

Cuban primes (view source)

Revision as of 15:15, 25 April 2020

4 bytes removed ,  4 years ago
m
→‎{{header|Haskell}}
Line 871:
printf "\nThe 100,000 cuban prime is: %10s\n" $ thousands $ cubans !! 99999
where
r = chunksOf 810 . take 200</lang>
{{out}}
<pre>
7 19 37 61 127 271 331 397 547 631
547919 1,657 631 1,801 919 1,951 1 2,657269 12,801437 12,951791 23,269169 23,437571 4,219
24,791447 35,169167 35,571419 46,219211 47,447057 57,167351 58,419269 69,211241 10,267 11,719
712,057097 713,351267 13,669 816,269651 19,441 919,241927 1022,267447 1123,719497 1224,097571 1325,267117
1326,669227 1627,651361 1933,441391 1935,927317 2242,447841 2345,497757 2447,571251 2549,117537 50,311 55,897
2659,227221 2760,361919 3365,391269 3570,317687 4273,841477 4574,757419 4775,251367 4981,537181 82,171 87,211
5088,311237 5589,897269 5992,221401 6096,919661 65102,269121 70103,687231 104,347 73 110,477017 112,327 74114,419661
75115,367837 81126,181691 82129,171169 87131,211671 88135,237469 89140,269617 144,541 92145,401861 151,201 96 155,661269
102163,121567 103169,231219 104170,347647 110176,017419 112180,327811 114189,661757 115200,837467 126202,021 213,067 231,691019
129234,169361 131241,671117 135246,469247 140251,617431 144260,541191 145263,861737 151267,201307 155276,269337 279,991 283,669
163285,567517 169292,219969 170296,647731 176298,419621 180310,811087 189329,757677 200333,467667 202337,021681 347,821 351,919
213360,067187 231368,019551 234372,361769 241374,117887 246377,247011 251383,431419 260387,191721 263398,737581 407,377 423,001
267436,307627 276452,337797 279459,991817 283476,669407 285478,517801 292493,969291 296522,731919 298527,621941 553,411 574,219
310584,087767 329590,677077 333592,667741 337595,681411 347603,821457 351608,919851 360611,187557 619,711 627,919 368650,551071
372658,769477 374666,887937 377689,011761 383692,641 698,419 387707,721131 398733,581591 407742,377519 423760,537 769,001627
436772,627669 452784,797897 459791,817047 476812,407761 478825,801301 493837,291937 522847,919477 527863,941497 879,667 886,177
553895,411987 574909,219151 584915,767769 590925,741 929,077 592932,741419 595939,411121 603952,457597 608972,851991 976,411
611986,557707 619990,711151 627997,919057 1,021,417 1,024,921 6501,071 035,469 6581,477 074,607 6661,085,937407 6891,761110,817 6921,114,641471
1,125,469 1,155,061 1,177,507 1,181,269 1,215,397 1,253,887 1,281,187 1,285,111 1,324,681 1,328,671 1,372,957 1,409,731▼
698,419 707,131 733,591 742,519 760,537 769,627 772,669 784,897
1,372,957 1,409,731 1,422,097 1,426,231 1,442,827 1,451,161 1,480,519 1,484,737 1,527,247 1,570,357▼
791,047 812,761 825,301 837,937 847,477 863,497 879,667 886,177
895,987 909,151 915,769 925,741 929,077 932,419 939,121 952,597
972,991 976,411 986,707 990,151 997,057 1,021,417 1,024,921 1,035,469
1,074,607 1,085,407 1,110,817 1,114,471 1,125,469 1,155,061 1,177,507 1,181,269
▲ 1,215,397 1,253,887 1,281,187 1,285,111 1,324,681 1,328,671 1,372,957 1,409,731
▲ 1,422,097 1,426,231 1,442,827 1,451,161 1,480,519 1,484,737 1,527,247 1,570,357
 
The 100,000 cuban prime is: 1,792,617,147,127
Anonymous user
Retrieved from "https://rosettacode.org/wiki/Special:MobileDiff/287763"