Arithmetic/Rational: Difference between revisions
→{{header|J}}
(→{{header|J}}: Use lang tags) |
|||
Line 681:
faster version (but the problem, as stated, is still tremendously inefficient):
<lang j> factors=:
is_perfect_rational=: 2= +/@:%@,@factors</lang>
<lang j> I.is_perfect_rational@"0 i.2^19
| |||