RosettaCodeData/Task/Babbage-problem/Lambdatalk/babbage-problem.lambdatalk
2023-07-01 13:44:08 -04:00

7 lines
49 KiB
Text

{S.map {lambda {:n}
{if {= {% {* :n :n} 1000000} 269696}
then :n{sup 2} = {* :n :n}
else}}
{S.serie 2 100000 2}}
-> 25264^2 = 638269696 99736^2 = 9947269696
...