        READ (5, 10) X
  10    FORMAT (F2.1)
        WRITE (6, 11) X
  11    FORMAT (1X, F3.4)
        STOP
        END
