Sometimes it is needed to keep the powers as the fractional form. However Mathematica tends to write x^(1/2) as Sqrt[x].

How do I keep x^(1/2) as it is in the output without writing it as Sqrt[x]?

Here is a simple example:

 expr = Rationalize[1+x^(0.5),0.0000001] >> output.m

Output is

 1 + Sqrt[x]

Instead I want the output to have the form

 1 + x^(1/2)

I could not find any solution for this.