Please can some one could give me an example of a pascal procedure that rewrites every word in reverse order in a text file