Continued fraction: Difference between revisions
Added Wren
m (Removed useless “$” when calling “echo”.) |
(Added Wren) |
||
Line 3,253:
2.71828182845905
3.14159262280485</pre>
=={{header|Wren}}==
{{trans|D}}
<lang ecmascript>var calc = Fn.new { |f, n|
var t = 0
for (i in n..1) {
var p = f.call(i)
t = p[1] / (p[0] + t)
}
return f.call(0)[0] + t
}
var pList = [
["sqrt(2)", Fn.new { |n| [(n > 0) ? 2 : 1, 1] }],
["e ", Fn.new { |n| [(n > 0) ? n : 2, (n > 1) ? n - 1 : 1] }],
["pi ", Fn.new { |n| [(n > 0) ? 6 : 3, (2*n - 1) * (2*n - 1)] }]
]
for (p in pList) System.print("%(p[0]) = %(calc.call(p[1], 200))")</lang>
{{out}}
<pre>
sqrt(2) = 1.4142135623731
e = 2.718281828459
pi = 3.1415926228048
</pre>
=={{header|XPL0}}==
| |||