Perfect numbers: Difference between revisions
Content deleted Content added
m Fixed up LL method formula |
added haskell |
||
Line 59: | Line 59: | ||
END IF |
END IF |
||
END FUNCTION</qbasic> |
END FUNCTION</qbasic> |
||
=={{header|Haskell}}== |
|||
perf n = n == sum [i | i <- [1..n-1], n `mod` i == 0] |
|||
=={{header|J}}== |
=={{header|J}}== |