Fortran 字符串与数字转换

!可以借助fortran的内部文件来实现，核心概念是把字符串看作"文件"
integer::num
character*20::str1,str2,str3
num=11
str1='11'
str2='22'
str3='33'

 

!1，数字转字符
write(str1,"(i4.4)")num   ! 如有需要，不足四位前面补零 
print*,str1

 

!2，字符转数字
read(str1,"(i2)")num
print*,str1

 

!3，字符转字符（字符串连接...）
write(str1,"(a8)")trim(str1)//trim(str2)//trim(str3)//'eg' !两个斜杆//连接不同的字符串

 

!还有一种办法可以实现字符串连接
str1(3:4)=str2
str1(5:6)=str3
str1(7:8)='eg'
print*,str1
end

 

 

注意：

Fortran 无格式文件的读写，是按数据块操作的，默认文件头文件尾和中间字节，编译器不同文件插入字节也可能不同；

与C语言通过文件交互时，最好选用二进制或文本格式，慎用无格式。