RosettaCodeData/Task/Iterated-digits-squaring/J/iterated-digits-squaring-8.j
2023-07-01 13:44:08 -04:00

2 lines
45 B
Text

+/+/@:-.@digsq1e8"1(1+i.100 1e6)
85744333