Project Euler Q5 解法

_李宇

于 2014-05-21 01:14:10 发布

阅读量1.1k

点赞数

分类专栏： Project Euler答案

本文链接：https://blog.csdn.net/ylilarry/article/details/26416741

版权

Project Euler答案专栏收录该内容

5 篇文章

订阅专栏

本文探讨了如何找出能被1到20之间所有整数整除的最小正整数，并提供了一段Haskell代码实现。该问题通过计算从1到20这些整数的最小公倍数来解决。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

-- 2520 is the smallest number that can be divided by each of the numbers from 1 to 10 without any remainder.
-- What is the smallest positive number that is evenly divisible by all of the numbers from 1 to 20?

lcmL :: [Int] -> Int
lcmL (x:[]) = x
lcmL (x:xs) = lcm x (lcmL xs)

main = print $ lcmL [1..20]