ex0915.f90

来自「Fortran 95程序设计&Code-彭国伦」· F90 代码 · 共 11 行

program ex0915
  implicit none
  integer :: a
  character(len=20) :: string="123"
  
  read( string, * ) a
  write(*,*) a

  stop
end program