Primes which contain only one odd digit: Difference between revisions

Line 17:
end
println("Found $(length(found)) primes with one odd digit in base 10:")
foreach(p -> print(rpad(last(p), 5), first(p) % 9 == 0 ? "\n" : ""), enumerate(sort!(found)))
end
 
Line 30:
809 821 823 827 829 863 881 883 887
</pre>
 
 
 
=={{header|Ring}}==
4,102

edits