RosettaCodeData/Task/Convert-decimal-number-to-rational/Mathematica/convert-decimal-number-to-rational.math

Map[Rationalize[#,0]&,{0.9054054,0.518518, 0.75} ]
-> {4527027/5000000,259259/500000,3/4}