まともに書こうとしたが、諦めた p:10000

*./ 1+i.20

J言語使うと簡単 q:が素因数分解する動詞です。 {:q:600851475143

1000未満で且つ、3か5の倍数である自然数の和を求める全くJらしくないですが、Jです。 (+/ 5 * 1+ i.199) + (+/ 3 * 1 + i.333) - (+/ 15 * 1 + i.66)多少改善 +/ ~. (5 * i.200),(3 * i.334)