      PROGRAM FORMT
      REAL X, PI
      X = 0.025
      PI = 3.141593
      PRINT*
C
      PRINT*,'x =',X,' pi =',PI
C
      WRITE(*,*) 'x =',X,' pi =',PI
C
      WRITE(*,100) 'x =',X,'pi =',PI
 100  FORMAT(1X,A,F5.3,10X,A,F7.4)
C
      WRITE(*,150) 'x =',X,'pi =',PI
 150  FORMAT(1X,A,F5.2,10X,A,F7.2)
C
      WRITE(*,200) 'x =',X,'pi =',PI
 200  FORMAT(1X,A,E9.2,6X,A,E9.2)
C
      WRITE(*,250) 'x =',X,'pi =',PI
 250  FORMAT(1X,A,E13.6,2X,A,E14.7)
      PRINT*
      STOP
      END
