C       DIMENSION X(10)

       REAL X(5)

       X(1) = 1

       X(2) = 2

       X(3) = 3

       WRITE (6, 10) X(1), X(2), X(3)

  10   FORMAT (1X,  F5.2,  1X,  F3.1, 1X,  F5.3)

       STOP

       END