Jensen's Device: Difference between revisions
Content added Content deleted
(Added Euler) |
|||
Line 1,533: | Line 1,533: | ||
<pre> |
<pre> |
||
5.18737751763962 |
5.18737751763962 |
||
</pre> |
|||
=={{header|RPL}}== |
|||
{{works with|Halcyon Calc|4.2.7}} |
|||
≪ → idx lo hi term |
|||
≪ lo idx STO 0 |
|||
DO |
|||
term EVAL + |
|||
1 idx STO+ |
|||
UNTIL idx EVAL hi > END |
|||
idx PURGE |
|||
≫ |
|||
≫ |
|||
‘SUM’ STO |
|||
'K' 1 100 '1/K' SUM |
|||
'N' 0 100 '1/FACT(N)' SUM |
|||
{{out}} |
|||
<pre> |
|||
2: 5.18737751764 |
|||
1: 2.71828182846 |
|||
</pre> |
</pre> |
||