RosettaCodeData/Task/Continued-fraction/Maple/continued-fraction.maple

5 lines
114 B
Text
Raw Permalink Normal View History

2017-09-23 10:01:46 +02:00
contfrac:=n->evalf(Value(NumberTheory:-ContinuedFraction(n)));
contfrac(2^(0.5));
contfrac(Pi);
contfrac(exp(1));