Isqrt (integer square root) of X: Difference between revisions

Content added Content deleted
(Use the quadratic residue algorithm)
Line 2,236: Line 2,236:
T = 0
T = 0
DO WHILE (Q .LT. NUM)
DO WHILE (Q .LE. NUM)
Q = Q * 4
Q = Q * 4
END DO
END DO
Line 2,328: Line 2,328:
43 | 2,183,814,375,991,796,599,109,312,252,753,832,343 | 1,477,773,452,188,053,281
43 | 2,183,814,375,991,796,599,109,312,252,753,832,343 | 1,477,773,452,188,053,281
</pre>
</pre>



=={{header|FreeBASIC}}==
=={{header|FreeBASIC}}==