C  This program illustrates the use of a Do Loop - the only loop that early
C  FORTRAN had.
          DO 10 M =  55,17,-2
              J = 3 * M
              WRITE (6, 56) J, M
   10     CONTINUE
   56     FORMAT (1X,I10)
          STOP
          END