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

Add BQN
(Add J)
(Add BQN)
Line 45:
{{out}}
<pre>16 17 25 28 34 37 47 52 64</pre>
 
=={{header|BQN}}==
<lang bqn># 'Library' functions from BQNCrate
Digits ← 10 {⌽𝕗|⌊∘÷⟜𝕗⍟(↕1+·⌊𝕗⋆⁼1⌈⊢)}
Prime ← 2=·+´0=(1+↕)⊸|
 
(∧˝∘⍉∘((Prime +´∘Digits)¨⋆⌜⟜2‿3))⊸/↕100</lang>
{{out}}
<pre>⟨ 16 17 25 28 34 37 47 52 64 ⟩</pre>
 
=={{header|F_Sharp|F#}}==
2,093

edits