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 ARRAY1

      IMPLICIT NONE
      INTEGER N1, N2, N3, N4, N5, N6, N7, N8, N9, N10

      PRINT *, 'Please enter an integer'
      READ *, N1
      PRINT *, 'Please enter an integer'
      READ *, N2
      PRINT *, 'Please enter an integer'
      READ *, N3
      PRINT *, 'Please enter an integer'
      READ *, N4
      PRINT *, 'Please enter an integer'
      READ *, N5
      PRINT *, 'Please enter an integer'
      READ *, N6
      PRINT *, 'Please enter an integer'
      READ *, N7
      PRINT *, 'Please enter an integer'
      READ *, N8
      PRINT *, 'Please enter an integer'
      READ *, N9
      PRINT *, 'Please enter an integer'
      READ *, N10

      PRINT *, 'Here are the numbers you entered:'
      PRINT *, N1
      PRINT *, N2
      PRINT *, N3
      PRINT *, N4
      PRINT *, N5
      PRINT *, N6
      PRINT *, N7
      PRINT *, N8
      PRINT *, N9
      PRINT *, N10

      STOP
      END