OFFSET
1,2
LINKS
Herman P. Robinson, The CSR Function, Popular Computing (Calabasas, CA), Vol. 4 (No. 35, Feb 1976), pages PC35-3 to PC35-4. Annotated and scanned copy.
EXAMPLE
1.94265542276398732822141329141266723768807363...
MATHEMATICA
k = 64; r = 65; While[k > 0, r = Sqrt[k^2 + r]; k-- ]; RealDigits[r, 10, 111][[1]] (* Robert G. Wilson v, Nov 04 2004 *)
PROG
(PARI) t=0:forstep(n=100, 1, -1, t=sqrt(t+n^2)):print(t)
CROSSREFS
KEYWORD
AUTHOR
Mark Hudson (mrmarkhudson(AT)hotmail.com), Nov 03 2004
STATUS
approved