Select Code to Download

C:\>perl6 -e "printf '%.16e\n', 1.7320508075688772e0;"
1.7320508075688800e+00

C:\>perl6 -e "say Rat(0.7777777777777777777770) > Rat(0.77777777777777
+77777771);"
False

C:\>perl6 -e "say Num(Rat(0.7777777777777777777770)) > Num(Rat(0.77777
+77777777777777771));"
True

C:\>perl6 -e "say Num(0.7777777777777777777770e0) == Num(0.77777777777
+77777777771e0);"
True

C:\>perl6 -e "say 0.7777777777777777777770e0 == 0.77777777777777777777
+71e0;"
True