Getting the number of decimal places: Difference between revisions
Getting the number of decimal places (view source)
Revision as of 14:09, 23 August 2020
, 3 years agoAdded Perl example
SqrtNegInf (talk | contribs) (Added Perl example) |
|||
Line 125:
π has 15 decimals.
</pre>
=={{header|Perl}}==
Need pragma <code>bignum</code> to handle decimals beyond 15 digits.
<lang perl>use bignum;
printf "Fractional precision: %2s Number: %s\n", length((split /\./, $_)[1]) // 0, $_
for 9, 12.345, <12.3450>, 0.1234567890987654321, 1/3, 1.5**63;</lang>
{{out}}
<pre>Fractional precision: 0 Number: 9
Fractional precision: 3 Number: 12.345
Fractional precision: 4 Number: 12.3450
Fractional precision: 19 Number: 0.1234567890987654321
Fractional precision: 40 Number: 0.3333333333333333333333333333333333333333
Fractional precision: 63 Number: 124093581919.648947697827373650380188008224280338254175148904323577880859375</pre>
=={{header|Phix}}==
| |||