RosettaCodeData/Task/Continued-fraction/Maple/continued-fraction.maple
2023-07-01 13:44:08 -04:00

4 lines
114 B
Text

contfrac:=n->evalf(Value(NumberTheory:-ContinuedFraction(n)));
contfrac(2^(0.5));
contfrac(Pi);
contfrac(exp(1));