Example 4: Formatted read from an internal file: CHARACTER CA*16 / 'abcdefghijklmnop' /, L*8, R*8 READ( CA, 1 ) L, R 1 FORMAT( 2 A8 ).
確定! 回上一頁