FORTRAN、数値データと文字列の間の変換方法

戻る
 

 
方法　

 
文字列変数を CHA
数値変数(整数型・実数型・倍精度型)を NUM として、
 
 文字列から数値を読み取る　には、
 
　　read( CHA ,*) NUM
 
 数値データを文字列にする　には、
 
　　write( CHA ,*) NUM
 
とします。
 
「*」の部分はアスタリスクでいいのですが、状況に応じてフォーマットを指定してください。
 
 
サンプルプログラム　

 
      character*15 a,b,c,d
      character*20 e
      integer ia
      real rb
      double precision dc
      real rd
*
      a = '   123'       ! a は文字列です
      b = '  12.34'      ! b は文字列です
      c = ' 1.234D0'     ! c は文字列です
*
      read(a,*) ia       ! a -> ia
      read(b,*) rb       ! b -> rb
      read(c,*) dc       ! c -> dc
*
      rd = real(ia) + rb + sngl(dc)
c                        ! 足し算ができる、つまり ia, rb, dc は数値
*
      write(d,601) rd    ! rd -> d
 601  format (E15.6)
*
      e = 'ABC'//d       ! 文字列の連結ができる、つまり d は文字列
*
      write(*,*) e       ! 「ABC   0.136574E+03」と表示される
*
      stop
      end
 
 
戻る