Sylvester's sequence: Difference between revisions
→{{header|Nim}}
Thundergnat (talk | contribs) m (Remove a bunch of unneeded and unwanted white space) |
|||
Line 454:
Sum of reciprocals of first 10: 0.9999999999999999999999999999999999999999999999999999999999999999999999999999914
</pre>
=={{header|Mathematica}}/{{header|Wolfram Language}}==
<lang Mathematica>Rest[Nest[Append[#, (Times @@ #) + 1] &, {1}, 10]]
N[Total[1/%], 250]</lang>
{{out}}
<pre>{2,3,7,43,1807,3263443,10650056950807,113423713055421844361000443,12864938683278671740537145998360961546653259485195807,165506647324519964198468195444439180017513152706377497841851388766535868639572406808911988131737645185443}
0.99999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999996349359079841301329356159748234615361531272</pre>
=={{header|Nim}}==
| |||