C Created:  Joe Zachary, October 26, 1992
C Modified:


C This program reads ten numbers and then prints them back
C to the user.

      PROGRAM ARRAY3

      IMPLICIT NONE
      INTEGER N(10), I

      DO I = 1, 10
         PRINT *, 'Please enter an integer'
         READ *, N(I)
      ENDDO

      PRINT *, 'Here are the numbers you entered:'

      DO I = 1, 10
         PRINT *, N(I)
      ENDDO

      STOP
      END