Anonymous user
Babbage problem: Difference between revisions
added Ol
(added Ol) |
|||
Line 1,785:
</lang>
=={{header|Ol}}==
<lang scheme>
(print
(let loop ((i 2))
(if (eq? (mod (* i i) 1000000) 269696)
i
(loop (+ i 2)))))
</lang>
{{out}}
<pre>25264</pre>
=={{header|PARI/GP}}==
<lang parigp>m=269696;
Line 1,794 ⟶ 1,804:
)
)}</lang>
=={{header|Pascal}}==
|