DIMENSION A(16)
      DO 20 N=1,16
20    A(N)=2.0**N
      WRITE (1,25) (N,A(N),N=1,16)
25    FORMAT (I2, F10.2)
      CALL EXIT
      END