Реализации алгоритмов/Решето Эратосфена: различия между версиями

Содержимое удалено Содержимое добавлено
м →‎Haskell: дополнение, уточнение, обновление данных
Строка 100:
</source>
 
Медленный вариант с использованием функционала filter:
<source lang="haskell">
primesOf n = helper [2..n] where
helper [] = []
helper (x:xs) = x : (helper (filt x xs))
 
filt a lst = filter (\x -> (mod x a) /= 0) lst
 
</source>
===Неограниченное решето===