1. 程式人生 > >Fortran 字串與數字轉換

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語言通過檔案互動時,最好選用二進位制或文字格式,慎用無格式。