Fermat numbers: Difference between revisions

Content added Content deleted
Line 27: Line 27:
=={{header|Arturo}}==
=={{header|Arturo}}==
<lang rebol>nPowers: [1 2 4 8 16 32 64 128 256 512]
<lang rebol>nPowers: [1 2 4 8 16 32 64 128 256 512]
fermatSet: map 0..9 'x -> 1 + 2 ^ nPowers \ x
fermatSet: map 0..9 'x -> 1 + 2 ^ nPowers\[x]
loop 0..9 'i ->
loop 0..9 'i ->
print ["F(" i ") =" fermatSet \ i]
print ["F(" i ") =" fermatSet\[i]]


print ""
print ""


loop 0..9 'i ->
loop 0..9 'i ->
print ["Prime factors of F(" i ") =" factors.prime fermatSet \ i]</lang>
print ["Prime factors of F(" i ") =" factors.prime fermatSet\[i]]</lang>


=={{header|C}}==
=={{header|C}}==