Riordan numbers: Difference between revisions

Content added Content deleted
(Created Nim solution.)
(add RPL)
Line 1,349: Line 1,349:
The one thousandth: 51077756867821111314..79942013897484633052 (472 digits)
The one thousandth: 51077756867821111314..79942013897484633052 (472 digits)
The ten thousandth: 19927418577260688844..71395322020211157137 (4765 digits)</pre>
The ten thousandth: 19927418577260688844..71395322020211157137 (4765 digits)</pre>

=={{header|RPL}}==
{{works with|HP|28}}
Needed to use unsigned integers to avoid the loss of the last digit of a(31).
≪ { #1 #0 }
'''WHILE''' DUP2 SIZE 1 - > '''REPEAT'''
DUP SIZE 1 -
DUP2 GETI 3 * 4 ROLLD
GET 2 * ROT +
OVER * SWAP 2 + /
+
'''END''' SWAP DROP
≫ '<span style="color:blue">RIORDAN</span>' STO

31 <span style="color:blue">RIORDAN</span>
{{out}}
<pre>
1: { #1d #0d #1d #1d #3d #6d #15d #36d #91d #232d #603d #1585d #4213d 11298d #30537d #83097d #227475d #625992d #1730787d #4805595d #13393689d #37458330d #105089229d #295673994d #834086421d #2358641376d #6684761125d #18985057351d #54022715451d #154000562758d #439742222071d #1257643249140d }
</pre>


=={{header|Wren}}==
=={{header|Wren}}==