check x = filter((==0) .(\(x,y) -> x `mod` y)) $ zip (replicate 20 x) [1..20] print $ take 1 $ filter ((==20). length) [check x | x <- [1..]]我试图通过http://www.compileonline.com/compile_haskell_online.php运行上面的代码,但
我必须从2 to N中找出所有数字的因子总数。 这是我的方法。 运行Sieve of Eratosthenes并从2 to N获取所有素数。对于2 to N中的每个数字,执行素数分解,并获得所有素数因子的指数。将1加到每个素数因子指数上并乘以所有指数,即, N = 2^x1 * 3^x2 * 5*x</
我一直在做一个项目,在这个项目中,用户被要求导入一个数字,这个数字通过一个数学序列。然后将输出放入一个函数中,以找出该数字的因子。从那里我试着找出质数的因子?这就是我到目前为止所拥有的。enter code here####################################
n = int(input("Enter the n value&
所以我试图解决Euler项目的第三个问题,在这个问题中,你必须得到一个数的最大素数因子。我正在尝试这个问题,。我通过了所有的测试2,3,5,7,8和13195,但从13195以上,我得到一个Potential infinite loop detected on line 12.600851475143的最终测试会发出以下警告:我做错了什么,因为我