Primes whose sum of digits is 25: Difference between revisions
Primes whose sum of digits is 25 (view source)
Revision as of 14:33, 11 September 2021
, 2 years ago→{{header|Nanoquery}}
(→{{header|ALGOL 68}}: Use ALGOL 68-prime) |
|||
Line 1,271:
{{out}}
<pre>997 1699 1789 1879 1987 2689 2797 2887 3499 3697 3769 3877 3967 4597 4759 4957 4993 </pre>
=={{header|Mathematica}}/{{header|Wolfram Language}}==
<lang Mathematica>Select[Prime[Range@PrimePi[4999]], IntegerDigits /* Total /* EqualTo[25]]</lang>
{{out}}
<pre>{997, 1699, 1789, 1879, 1987, 2689, 2797, 2887, 3499, 3697, 3769, 3877, 3967, 4597, 4759, 4957, 4993}</pre>
=={{header|Nanoquery}}==
| |||