C Example of different ways to read data

      PROGRAM READER

      IMPLICIT NONE
      INTEGER X(4)

      PRINT *, 'Please enter four one-digit numbers.  Each'
      PRINT *, 'should be at the beginning of a different line.'

      READ *, X(1)

      READ (UNIT=*, FMT=*) X(2)

      READ (UNIT=5, FMT=*) X(3)

      READ (UNIT=5, FMT=75) X(4)

 75   FORMAT (I1)

      PRINT *, X(1), X(2), X(3), X(4)

      STOP
      END