Smallest multiple: Difference between revisions
Content added Content deleted
Line 175: | Line 175: | ||
200 -> 337293588832926264639465766794841407432394382785157234228847021917234018060677390066992000 |
200 -> 337293588832926264639465766794841407432394382785157234228847021917234018060677390066992000 |
||
2000 -> 151117794877444315307536308337572822173736308853579339903227904473000476322347234655122160866668946941993951014270933512030194957221371956828843521568082173786251242333157830450435623211664308500316844478617809101158220672108895053508829266120497031742749376045929890296052805527212315382805219353316270742572401962035464878235703759464796806075131056520079836955770415021318508272982103736658633390411347759000563271226062182345964184167346918225243856348794013355418404695826256911622054015423611375261945905974225257659010379414787547681984112941581325198396634685659217861208771400322507388161967513719166366839894214040787733471287845629833993885413462225294548785581641804620417256563685280586511301918399010451347815776570842790738545306707750937624267501103840324470083425714138183905657667736579430274197734179172691637931540695631396056193786415805463680000</pre> |
2000 -> 151117794877444315307536308337572822173736308853579339903227904473000476322347234655122160866668946941993951014270933512030194957221371956828843521568082173786251242333157830450435623211664308500316844478617809101158220672108895053508829266120497031742749376045929890296052805527212315382805219353316270742572401962035464878235703759464796806075131056520079836955770415021318508272982103736658633390411347759000563271226062182345964184167346918225243856348794013355418404695826256911622054015423611375261945905974225257659010379414787547681984112941581325198396634685659217861208771400322507388161967513719166366839894214040787733471287845629833993885413462225294548785581641804620417256563685280586511301918399010451347815776570842790738545306707750937624267501103840324470083425714138183905657667736579430274197734179172691637931540695631396056193786415805463680000</pre> |
||
=={{header|jq}}== |
|||
'''Works with jq''' (*)<br> |
|||
'''Works with gojq, the Go implementation of jq''' |
|||
The following uses `is_prime` as defined at [[Erd%C5%91s-primes#jq]]. |
|||
(*) The C implementation of jq has sufficient accuracy for N == 20 but not N == 200, |
|||
so the output shown below is based on a run of gojq. |
|||
<lang jq># Output: a stream of primes less than $n in increasing order |
|||
def primes($n): |
|||
2, (range(3; $n; 2) | select(is_prime)); |
|||
# lcm of 1 to $n inclusive |
|||
def lcm: |
|||
. as $n |
|||
| reduce primes($n) as $p (1; |
|||
. * ($p | until(. * $p > $n; . * $p)) ) ; |
|||
"N: LCM of the numbers 1 to N inclusive", |
|||
( 10, 20, 200, 2000 |
|||
| "\(.): \(smallest_multiple)" )</lang> |
|||
{{out}} |
|||
<pre> |
|||
N: LCM of the numbers 1 to N inclusive |
|||
10: 2520 |
|||
20: 232792560 |
|||
200: 337293588832926264639465766794841407432394382785157234228847021917234018060677390066992000 |
|||
2000: 151117794877444315307536308337572822173736308853579339903227904473000476322347234655122160866668946941993951014270933512030194957221371956828843521568082173786251242333157830450435623211664308500316844478617809101158220672108895053508829266120497031742749376045929890296052805527212315382805219353316270742572401962035464878235703759464796806075131056520079836955770415021318508272982103736658633390411347759000563271226062182345964184167346918225243856348794013355418404695826256911622054015423611375261945905974225257659010379414787547681984112941581325198396634685659217861208771400322507388161967513719166366839894214040787733471287845629833993885413462225294548785581641804620417256563685280586511301918399010451347815776570842790738545306707750937624267501103840324470083425714138183905657667736579430274197734179172691637931540695631396056193786415805463680000 |
|||
</pre> |
|||
=={{header|Julia}}== |
=={{header|Julia}}== |