想请教一下各位，
我目前有一个档案，是数字跟字串混和
有点像这样的格式：
字串行........
字串 数字 数字 数字
字串 数字 数字 数字
字串 数字 数字 数字
字串行
字串行
字串 字串 字串 数字
字串 字串 字串 数字
字串 字串 字串 数字
.
.
.
.
.
字串行
因为是字串跟数字混合的格式，读取有点麻烦，
所以我一开始想说全部用字串的型态读入，
e.g.
character(len=20):: var_1, var_2, var_3, var_4
read(unit=fileid, fmt=*), var_1, var_2, var_3, var_4
最后再拿出字串型态的"数字"，转变回数字型态在做运算。
可是我现在卡在，不知道要如何将字串型态的数字，
转变回数字型态............
我有想到一个方法，就是将这些字串型态的数字，写到另一个暂存盘，
再用数字型态给他读回来.......
不过这样有点麻烦，
想请问一下有没有更简便的方式，
可以直接将字串型态的数字，直接转变为数字型态？
我找到解决方法了，利用内部档（internal file)的方式
字串转数字：
character(len=20):: string
real(kind=8):: number
read(string,fmt=*) number
数字转字串:
character(len=20):: string
real(kind=8):: number
write(unit=string, fmt=*) number