RosettaCodeData/Task/Arithmetic-Rational/J/arithmetic-rational-10.j
2023-07-01 13:44:08 -04:00

2 lines
62 B
Text

(#~ is_perfect_rational"0) (* <:@+:) 2^i.10x
6 28 496 8128