我的程序是：
Rapp = Import["C:/Input/ASB14/horizontal/Repi.txt", "List"]n = Length[Rapp]
For[i = 1, i < n + 1, i++,
If[R[[i]] < 10, Rapp[[i]] = 5];
If[10 <= R[[i]] < 100, Rapp[[i]] = SetPrecision[R[[i]], 1]];
If[R[[i]] >= 100, Rapp[[i]] = SetPrecision[R[[i]], 2]];]
Rapp
Export["C:/output/ASB14/Rapp.dat", Rapp, "Data"]
程序目的：把原始文件里的非常分散的数据，通过设置精度的方法，合并到整十。
输出里面包含着像98.，91.这样的数据。这个数据应该满足第二个条件（介于10和100之间），但是98.的精度应该不是我设置的精度。

退一万步说，你也该把出错的TXT发出来，更合理的做法，是应该先自己把出错的行给定位出来，让别人能直接通过执行你的代码重现问题。现在你这问题根本没法答。