Fermat numbers: Difference between revisions

Content added Content deleted

Inline

@@ Line 26: / Line 26: @@
 =={{header|Arturo}}==
+<lang rebol>nPowers: [1 2 4 8 16 32 64 128 256 512]
+fermatSet: map 0..9 'x -> 1 + 2 ^ nPowers \ x
-<lang arturo>nPowers: #(1 2 4 8 16 32 64 128 256 512)
-fermatSet: map 0..9 -> 2^nPowers.[&]+1
+loop 0..9 'i ->
+    print ["F(" i ") =" fermatSet \ i]
-loop 0..9 {
-	print "F(" + & + ") = " + fermatSet.[&]
-}
 print ""
-loop 0..9 {
+loop 0..9 'i ->
-	print "prime factors of F(" + & + ") = " + [primeFactors fermatSet.[&]]
+    print ["Prime factors of F(" i ") =" factors.prime fermatSet \ i]    </lang>
-}</lang>
-{{out}}
-<pre>F(0) = 3
-F(1) = 5
-F(2) = 17
-F(3) = 257
-F(4) = 65537
-F(5) = 4294967297
-F(6) = 18446744073709551617
-F(7) = 340282366920938463463374607431768211457
-F(8) = 115792089237316195423570985008687907853269984665640564039457584007913129639937
-F(9) = 13407807929942597099574024998205846127479365820592393377723561443721764030073546976801874298166903427690031858186486050853753882811946569946433649006084097
-prime factors of F(0) = #(3)
-prime factors of F(1) = #(5)
-prime factors of F(2) = #(17)
-prime factors of F(3) = #(257)
-prime factors of F(4) = #(65537)
-prime factors of F(5) = #(641 6700417)
-prime factors of F(6) = #(274177 67280421310721)
-prime factors of F(7) = #(59649589127497217 5704689200685129054721)
-prime factors of F(8) = #(1238926361552897 93461639715357977769163558199606896584051237541638188580280321)
-prime factors of F(9) = #(2424833)</pre>
 =={{header|C}}==