Jump to content

Sum of square and cube digits of an integer are primes: Difference between revisions

m
julia example
m (→‎{{header|Perl}}: note use of 'ntheory' module)
m (julia example)
Line 81:
next n</lang>
{{out}}<pre>16 17 25 28 34 37 47 52 64</pre>
 
=={{header|Julia}}==
<lang julia>using Primes
 
is_sqcubsumprime(n) = isprime(sum(digits(n*n))) && isprime(sum(digits(n*n*n)))
println(filter(is_sqcubsumprime, 1:100)) # [16, 17, 25, 28, 34, 37, 47, 52, 64]
</lang>
 
=={{header|Perl}}==
4,105

edits

Cookies help us deliver our services. By using our services, you agree to our use of cookies.