<!-- hamlet
<!-- copytar
examples/                                                                                              755    1107     770            0  5551313440   5705                                                                                                                                                                                                                                                                                                                                                                      examples/array4.f                                                                                      644    1107     770          734  5551313433   7331                                                                                                                                                                                                                                                                                                                                                                      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 ARRAY4

      IMPLICIT NONE
      INTEGER SIZE
      PARAMETER (SIZE = 10)
      INTEGER N(SIZE), I

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

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

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

      STOP
      END
  cs300 t  |   cs301 n  examples/array1.f                                                                                      644    1107     770         2050  5506142041   7332                                                                                                                                                                                                                                                                                                                                                                      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
6 ,	  P   cs567  	  `   cs571 
  p ~  cs571-1    =  cs572 pe   	ӻ  cs573 n2      cs574 9      cs576    w  	cs574.s92    	NF  cs577 B   f  cs579     o  cs590 ,    {L  dsl    -  cs610  	    	NM  cs611 I  0 )  cs638 P  @   cs651 `  P \  cs667 n0  `  ZV  cs679 rt  p  G  parsym      cs513 pl   ,  cs564 pl      quotas t      .mvclass ort  examples/array3.f                                                                                      644    1107     770          647  5551313426   7335                                                                                                                                                                                                                                                                                                                                                                      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
e enter an integer'
      READ *, N4
      PRINT *, 'Please enter an integer'
      READ examples/array2.f                                                                                      644    1107     770         2056  5551313416   7347                                                                                                                                                                                                                                                                                                                                                                      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 ARRAY2

      IMPLICIT NONE
      INTEGER N(10)

      PRINT *, 'Please enter an integer'
      READ *, N(1)
      PRINT *, 'Please enter an integer'
      READ *, N(2)
      PRINT *, 'Please enter an integer'
      READ *, N(3)
      PRINT *, 'Please enter an integer'
      READ *, N(4)
      PRINT *, 'Please enter an integer'
      READ *, N(5)
      PRINT *, 'Please enter an integer'
      READ *, N(6)
      PRINT *, 'Please enter an integer'
      READ *, N(7)
      PRINT *, 'Please enter an integer'
      READ *, N(8)
      PRINT *, 'Please enter an integer'
      READ *, N(9)
      PRINT *, 'Please enter an integer'
      READ *, N(10)

      PRINT *, 'Here are the numbers you entered:'
      PRINT *, N(1)
      PRINT *, N(2)
      PRINT *, N(3)
      PRINT *, N(4)
      PRINT *, N(5)
      PRINT *, N(6)
      PRINT *, N(7)
      PRINT *, N(8)
      PRINT *, N(9)
      PRINT *, N(10)

      STOP
      END
P   cs567  	  `   cs571 
  p ~  cs571-1    =  cs572 pe   	ӻ  cs573 n2      cs574 9      cs576    w  	cs574.s92    	NF  cs577 B   f  cs579     o  cs590 ,    {L  dsl    -  cs610  	    	NM  cs611 I  0 )  cs638 P  @   cs651 `  P \  cs667 n0  `  ZV  cs679 rt  p  G  parsym      cs513 pl   ,  cs564 pl      quotas t      .mvclass ort                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                  