Modular exponentiation: Difference between revisions
Content deleted Content added
m →{{header|Perl}}: Update to 40 digits |
→{{header|TXR}}: Added. |
||
Line 107: | Line 107: | ||
Output: |
Output: |
||
<pre>1527229998585248450016808958343740453059</pre> |
<pre>1527229998585248450016808958343740453059</pre> |
||
=={{header|TXR}}== |
|||
<lang txr>@(bind result @(exptmod 2988348162058574136915891421498819466320163312926952423791023078876139 |
|||
2351399303373464486466122544523690094744975233415544072992656881240319 |
|||
(expt 10 40)))</lang> |
|||
<pre>$ ./txr rosetta/modexp.txr |
|||
result="1527229998585248450016808958343740453059"</pre> |