Rosetta Code

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

Page Discussion

Isqrt (integer square root) of X (view source)

Revision as of 08:37, 15 March 2023

10 bytes added ,  1 year ago
m
RPL comments
(add RPL)
m (RPL comments)
Line 5,726:
´'''ISQRT'''’ STO
|
'''ISQRT''' ''( #n -- #√nsqrt(n) )''
q ◄── 1
perform while q <= x
Line 5,739:
z ◄── z - u
r ◄── r + q
else remove u and copy of z from stack
end perform, clean stack
Aerobar
1,150

edits

Retrieved from "https://rosettacode.org/wiki/Special:MobileDiff/338768"