C      THE PURPOSE OF THIS PROGRAM IS TO TEST HOW INTEGER DIVISION
C      BEHAVE
       NUMBER1 = 27
       XNUMBER2 = 2
       ANSWER = FLOAT(NUMBER1) / NUMBER2
       WRITE (6,10) ANSWER
  10   FORMAT (1X, F10.2)
       STOP
       END
