Babbage problem: Difference between revisions

Line 194:
===⍣===
<syntaxhighlight lang=apl>
⍝ s = 520 + 2 ... + 2 ⍣ :<= power
⍝ s × s = n × 1000000 + 269696 | :<= remainder
 
2+⍣{269696=1000000|⍺×⍺}520
Line 205:
</pre>
 
==== Documentation ====
 
<pre>
Answer Answer: n
Yes│
┌───┌── remainder = 269696 ? ──┤
│ Power No│
│ (⍣)
n ← n + 2 ◁────────────────────────────◁─────────────────── n ← 520
 
Flow Created with Monodraw
</pre>
 
422

edits