Anonymous user
Continued fraction: Difference between revisions
m
→Version 1: added note about omitted ß are assumed to be equal to unity; carefully clarified a cosmetic comment. -- ~~~~
Walterpachl (talk | contribs) (→{{header|NetRexx}}: simplified version using public variables) |
m (→Version 1: added note about omitted ß are assumed to be equal to unity; carefully clarified a cosmetic comment. -- ~~~~) |
||
Line 812:
numeric digits 100 /*use 100 digits for the display.*/
terms=500 /*use 500 terms for calculations.*/
/*omitted ß terms are assumed = 1*/
/*══════════════════════════════════════════════════════════════════════*/
a=1 rep(2); call tell '√2', cf(a)
Line 817 ⟶ 818:
a=1 rep(1 2); call tell '√3', cf(a) /*also: 2∙sin(π/3) */
/*══════════════════════════════════════════════════════════════════════*/
/*
do N=2 to 17 /*generalized √ N */
a=1 rep(2); b=rep(N-1); call tell 'gen √'N, cf(a,b)
| |||