Additive primes: Difference between revisions

m
(Added Modula-3)
Line 2,361:
 
=={{header|langur}}==
<syntaxhighlight lang="langur">val .isPrime = fn(.i) .i == 2 or .i > 2 and{
not any fn(.x) .i div .x, pseries== 2 ..or .i ^/> 2 and
not any fn(.x) { .i div .x }, pseries 2 .. .i ^/ 2
}
 
val .sumDigits = fn(.i) { fold fn{+}, s2n string .i }
 
writeln "Additive primes less than 500:"
885

edits